From b1acf22f3deaa7ef233ec5e3e7ea12aa5c02929e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sat, 5 Sep 2026 10:18:57 +0200
Subject: Accept asset path for variable expansion in shell arguments

---
 src/Asset.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Asset.hs')

diff --git a/src/Asset.hs b/src/Asset.hs
index 37e332b..2b14dcf 100644
--- a/src/Asset.hs
+++ b/src/Asset.hs
@@ -1,6 +1,6 @@
 module Asset (
     Asset(..),
-    AssetPath(..),
+    AssetPath(..), textAssetPath,
 ) where
 
 import Data.Text (Text)
@@ -27,7 +27,7 @@ instance ExprType Asset where
         ]
 
 instance ExprType AssetPath where
-    textExprType _ = "filepath"
+    textExprType _ = "Filepath"
     textExprValue = ("filepath:" <>) . textAssetPath
 
     exprExpansionConvTo = cast textAssetPath
-- 
cgit v1.2.3