diff --git a/src/Util/Rest.hs b/src/Util/Rest.hs
index 29ad0f9..e04603a 100644
--- a/src/Util/Rest.hs
+++ b/src/Util/Rest.hs
@@ -19,5 +19,5 @@ jsonGet :: Data a => (String -> Snap (Maybe a)) -> Snap ()
 jsonGet lookup = restfulGet $ \id -> do
     maybeFound <- lookup id
     case maybeFound of
-      nothing -> notFound
+      Nothing -> notFound
       Just(val) -> writeLBS $ JSON.encode $ val