diff options
Diffstat (limited to 'src/Parsers.hs')
| -rw-r--r-- | src/Parsers.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Parsers.hs b/src/Parsers.hs index 1450a0e..baaa287 100644 --- a/src/Parsers.hs +++ b/src/Parsers.hs @@ -87,7 +87,7 @@ templateParser = many . templateStringParser parseTemplate :: Config -> String -> IO [(Runnable,String,String)] parseTemplate c s = do str <- case parse (templateParser c) "" s of - Left _ -> return [("","","")] + Left _ -> return [("", s, "")] Right x -> return x let cl = map alias (commands c) m = Map.fromList $ zip cl (commands c) |