[Haskell-cafe] How to use "bracket" properly ?