From 4933d54aae987d60d274dc2fc387d6a2385000b5 Mon Sep 17 00:00:00 2001
From: nek0 <nek0@chelnok.de>
Date: Fri, 16 Oct 2015 04:15:16 +0200
Subject: [PATCH] fixed small errors

---
 Handler/Upload.hs | 6 +++---
 config/routes     | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Handler/Upload.hs b/Handler/Upload.hs
index 8a5257d..53ab55d 100755
--- a/Handler/Upload.hs
+++ b/Handler/Upload.hs
@@ -189,13 +189,13 @@ getUploadR = do
       if
         I.null albums
         then do
+          setMessage "Please create an album first"
+          redirect NewAlbumR
+        else do
           (uploadWidget, enctype) <- generateFormPost (bulkUploadForm userId)
           formLayout $ do
             setTitle "Eidolon :: Upload Medium"
             $(widgetFile "bulkUpload")
-        else do
-          setMessage "Please create an album first"
-          redirect NewAlbumR
     Nothing -> do
       setMessage "You need to be logged in"
       redirect LoginR
diff --git a/config/routes b/config/routes
index 4a15a38..f36a109 100755
--- a/config/routes
+++ b/config/routes
@@ -58,7 +58,7 @@
 /admin/comment			AdminCommentR		GET
 /admin/comment/#CommentId	AdminCommentDeleteR	GET
 
-/tag/#Text TagR GET
+/tag/#Text			TagR			GET
 
 /feed/root/atom.xml		RootFeedAtomR		GET
 /feed/root/rss.xml		RootFeedRssR		GET