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 |
