Refer to (MonadSnap m) instead of Snap