fixed small errors
This commit is contained in:
parent
1e41b779bd
commit
4933d54aae
2 changed files with 4 additions and 4 deletions
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue