nek0/eidolon
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

bug fix

Browse source
This commit is contained in:
nek0 2015-01-14 20:15:13 +01:00
parent c777812ddd
commit 312e9831e2
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Handler/AdminMediumSettings.hs
View file

@ -100,7 +100,7 @@ getAdminMediumDeleteR mediumId = do
runDB $ delete mediumId runDB $ delete mediumId
-- delete files -- delete files
liftIO $ removeFile (normalise $ tail $ mediumPath medium) liftIO $ removeFile (normalise $ tail $ mediumPath medium)
liftIO $ removeFile (normalise $ tail $ mediumPath medium) liftIO $ removeFile (normalise $ tail $ mediumThumb medium)
-- outro -- outro
setMessage "Medium deleted successfully" setMessage "Medium deleted successfully"
redirect $ AdminR redirect $ AdminR