use fat comma

anazawa · Mar 28, 2013 · 179185f · 179185f
1 parent 48e127a
commit 179185f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/CGI/Application/Plugin/Header.pm b/lib/CGI/Application/Plugin/Header.pm
@@ -23,7 +23,7 @@ sub header {
             if ( $PROPS != $props ) { # numeric compare of references
                 $header->clear;
                 while ( my ($key, $value) = each %{$PROPS} ) {
-                    $header->set( $key, $value );
+                    $header->set( $key => $value );
                 }
             }
         }
@@ -34,7 +34,7 @@ sub header {
     if ( @props ) {
         if ( @props % 2 == 0 ) {
             while ( my ($key, $value) = splice @props, 0, 2 ) {
-                $header->set( $key, $value );
+                $header->set( $key => $value );
             }
         }
         elsif ( @props == 1 ) {