From ddfa7957c4c0d659374b19a63904158f5539f818 Mon Sep 17 00:00:00 2001
From: nek0 <nek0@chelnok.de>
Date: Wed, 22 Jul 2015 07:01:34 +0200
Subject: [PATCH] ruling out seperator string as barcode

---
 Handler/Common.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Handler/Common.hs b/Handler/Common.hs
index ccb58f6..dbca47d 100644
--- a/Handler/Common.hs
+++ b/Handler/Common.hs
@@ -123,7 +123,7 @@ handleGetParam Nothing _ =
   return ()
 handleGetParam (Just b) eub = do
   f <- return $ T.filter C.isAlphaNum b
-  case (T.length f) > 0 of
+  case (T.length f) > 0 && b /= ", " of
     True -> do
       e <- runDB $ getBy $ UniqueBarcode f
       case e of