hxbrief: Support exact matches

src-hxbrief/Main.hs

@@ -171,6 +171,7 @@ matchPattern pat s = case break (== '*') pat of
     then error "only one glob supported in patterns!"
     else start `isPrefixOf` s && rest `isSuffixOf` s
   (""   , "") -> error "empty pattern"
+  (exact, "") -> exact == s
   _           -> undefined
 
 dispatchLine :: (StreamKind, String) -> StateT State IO ()