diff --git a/Makefile b/Makefile index 33015d51..2469db11 100644 --- a/Makefile +++ b/Makefile @@ -19,7 +19,6 @@ BINS := \ hbs2 \ hbs2-peer \ hbs2-keyman \ - git-remote-hbs2 \ hbs2-cli \ hbs2-sync \ fixme-new \ diff --git a/miscellaneous/suckless-conf/lib/Data/Config/Suckless/Script/Internal.hs b/miscellaneous/suckless-conf/lib/Data/Config/Suckless/Script/Internal.hs index 4c34904b..00c56643 100644 --- a/miscellaneous/suckless-conf/lib/Data/Config/Suckless/Script/Internal.hs +++ b/miscellaneous/suckless-conf/lib/Data/Config/Suckless/Script/Internal.hs @@ -2216,6 +2216,10 @@ internalEntries = do _ -> pure nil + entry $ bindMatch "path:split" $ \case + [ StringLike p ] -> pure $ mkList (fmap mkStr (splitPath p)) + _ -> throwIO $ BadFormException @c nil + entry $ bindMatch "path:exists?" $ \case [ StringLike p ] -> lift do liftIO (Dir.doesPathExist p) <&> mkBool