[Socialtext-commits] SF.net SVN: socialtext: [1003] branches/rug/lib/Socialtext/Rug/Cookie.pm
Brought to you by:
socialtextrocks
|
From: <pet...@us...> - 2007-01-30 22:36:49
|
Revision: 1003
http://svn.sourceforge.net/socialtext/?rev=1003&view=rev
Author: petdance
Date: 2007-01-30 14:36:19 -0800 (Tue, 30 Jan 2007)
Log Message:
-----------
Throw away $r under mod_perl1 for fetch()
Modified Paths:
--------------
branches/rug/lib/Socialtext/Rug/Cookie.pm
Modified: branches/rug/lib/Socialtext/Rug/Cookie.pm
===================================================================
--- branches/rug/lib/Socialtext/Rug/Cookie.pm 2007-01-30 22:32:07 UTC (rev 1002)
+++ branches/rug/lib/Socialtext/Rug/Cookie.pm 2007-01-30 22:36:19 UTC (rev 1003)
@@ -41,9 +41,20 @@
return $CookieClass->new( $req, @_ );
}
+=head2 fetch($r, $cookie)
+
+We must have a request object passed in, although mod_perl1 doesn't
+use it. If we're under mod_perl, we'll throw the $r away.
+
+=cut
+
sub fetch {
shift;
+ if ( $api eq 'mod_perl1' ) {
+ shift; # Remove the unused $r passed in
+ }
+
return $CookieClass->fetch(@_);
}
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|