diff --git a/Handler/Common.hs b/Handler/Common.hs
index 2d83312..ca86982 100644
--- a/Handler/Common.hs
+++ b/Handler/Common.hs
@@ -234,7 +234,7 @@ isUser uId route = do
   case mUser of
     Nothing -> do
       setMessageI MsgUserUnknown
-      redirect route
+      redirectWith status404 route
     Just user ->
       return user
 
@@ -244,6 +244,6 @@ isBeverage bId route = do
   case mBev of
     Nothing -> do
       setMessageI MsgItemUnknown
-      redirect route
+      redirectWith status404 route
     Just bev ->
       return bev