basis: removing unnecessary method stack effects.

[factor.git] / basis / furnace / sessions / sessions.factor

diff --git a/basis/furnace/sessions/sessions.factor b/basis/furnace/sessions/sessions.factor
index 13deeff9a01c5f0d40054ec2790c80f470c6a595..917d4f5113b1e216fe93626e0869869c3192d662 100644 (file)
--- a/basis/furnace/sessions/sessions.factor
+++ b/basis/furnace/sessions/sessions.factor
@@ -98,10 +98,10 @@ CONSTANT: session-id-key "__s"
 : put-session-cookie ( response -- response' )
     <session-cookie> put-cookie ;
 
-M: sessions modify-form ( responder -- xml/f )
+M: sessions modify-form
     drop session get id>> session-id-key hidden-form-field ;
 
-M: sessions call-responder* ( path responder -- response )
+M: sessions call-responder*
     sessions set
     request-session [ begin-session ] unless*
     existing-session put-session-cookie ;