Removed usage of unsafePerformIO.
Removed usage of unsafePerformIO.

Using the Snap monad's MonadIO instance (from the monads-fs package)
to call liftIO to lift the IO action into Snap.

akru/roshask,rgleichman/roshask,rgleichman/roshask,aa755/roshask,estump/roshask,aa755/roshask,bitemyapp/roshask,acowley/roshask,bitemyapp/roshask,acowley/roshask,akru/roshask,estump/roshask