wip

hbs2-cli/app/Main.hs

@@ -5,6 +5,7 @@ module Main where
 import HBS2.CLI.Prelude
 import HBS2.CLI.Run
 import HBS2.CLI.Run.KeyMan
+import HBS2.CLI.Run.MetaData
 
 import HBS2.OrDie
 
@@ -126,6 +127,7 @@ main = do
 
         internalEntries
         keymanEntries
+        metaDataEntries
 
         entry $ bindMatch "help" $ nil_ $ \syn -> do
 

hbs2-cli/lib/HBS2/CLI/Run/MetaData.hs

@@ -94,7 +94,6 @@ metaDataEntries = do
 
             _ -> mzero
 
-
       case (how, r) of
         ("parsed", Just (LitStrVal r0)) -> do