diff options
-rwxr-xr-x | bragi/bar.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/bragi/bar.hs b/bragi/bar.hs index 40548f37..df799326 100755 --- a/bragi/bar.hs +++ b/bragi/bar.hs | |||
@@ -425,6 +425,7 @@ getItemR itemId = do | |||
425 | 425 | ||
426 | selectRep $ do | 426 | selectRep $ do |
427 | provideJson entity | 427 | provideJson entity |
428 | provideRep (redirect $ UpdateItemR itemId :#: itemFragment itemId :: Handler Html) | ||
428 | 429 | ||
429 | patchItemR :: ItemId -> Handler Value | 430 | patchItemR :: ItemId -> Handler Value |
430 | patchItemR itemId = do | 431 | patchItemR itemId = do |