From 966563085f608eda7abeaa334015d0866437e7a5 Mon Sep 17 00:00:00 2001
From: Luke Clifton <luke.clifton@cba.com.au>
Date: Fri, 20 Dec 2024 08:30:38 +0800
Subject: [PATCH] Fix parsing error

---
 src/Main.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/Main.hs b/src/Main.hs
index f833582..89e4e29 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -238,7 +238,6 @@ parseItem lev = parseLevelIndicator *> P.choice
         parseInfo = MenuItem <$> (P.takeWhile (/= '\n') <* P.endOfLine) <*> pure []
         parseGeneric = do
             (name, params) <- parseBodyWithTags
-            params <- parseAllTags
             let pglob = Map.fromListWith (++) $ map (fmap (:[])) params
             case lookup "href" params of
                 Just s -> pure $ MenuItem name ["/usr/bin/open", s]