mirror of https://github.com/voidlizard/hbs2
wip
This commit is contained in:
parent
661fe8135b
commit
b4f8cd8354
|
@ -538,7 +538,6 @@ apply "quasiquot" args = do
|
|||
mkList <$> mapM (evalQQ mempty) args
|
||||
|
||||
apply name args' = do
|
||||
-- notice $ red "APPLY" <+> pretty name
|
||||
what <- ask >>= readTVarIO <&> HM.lookup name
|
||||
|
||||
case bindAction <$> what of
|
||||
|
|
Loading…
Reference in New Issue