Changeset 23236 for lang/perl/Moxy

Timestamp:

11/11/08 18:00:20 (2 months ago)

Author:

tokuhirom

Message:

なんか変なのでこれでどうか

Files:

• lang/perl/Moxy/trunk/lib/Moxy/Plugin/HTTPHeader.pm (modified) (1 diff)

lang/perl/Moxy/trunk/lib/Moxy/Plugin/HTTPHeader.pm

@@ -49 +49 @@
         # store settings
         my $r = CGI->new($args->{request}->content);
-        $args->{session}->set(__PACKAGE__ => $r->param('moxy_http_header'));
+        my $pkg = __PACKAGE__;
+        $args->{session}->set($pkg => $r->param('moxy_http_header'));
 
         # back