Merge branch 'master' of github.com:yesodweb/yesod
This commit is contained in:
commit
cf0fad20bc
@ -722,7 +722,7 @@ newIdent = do
|
|||||||
x <- get
|
x <- get
|
||||||
let i' = ghsIdent x + 1
|
let i' = ghsIdent x + 1
|
||||||
put x { ghsIdent = i' }
|
put x { ghsIdent = i' }
|
||||||
return $ T.pack $ 'h' : show i'
|
return $ T.pack $ "hident" ++ show i'
|
||||||
|
|
||||||
-- | Redirect to a POST resource.
|
-- | Redirect to a POST resource.
|
||||||
--
|
--
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user