Version 1.02

[catagits/Catalyst-Action-REST.git] / lib / Catalyst / Action / Serialize / JSONP.pm

diff --git a/lib/Catalyst/Action/Serialize/JSONP.pm b/lib/Catalyst/Action/Serialize/JSONP.pm
index c37c06c..31e3ba5 100644 (file)
--- a/lib/Catalyst/Action/Serialize/JSONP.pm
+++ b/lib/Catalyst/Action/Serialize/JSONP.pm
@@ -4,6 +4,9 @@ use namespace::autoclean;
 
 extends 'Catalyst::Action::Serialize::JSON';
 
+our $VERSION = '1.02';
+$VERSION = eval $VERSION;
+
 after 'execute' => sub {
   my $self = shift;
   my ($controller, $c) = @_;
@@ -16,7 +19,7 @@ after 'execute' => sub {
 
   my $callback_value = $c->req->param($callback_key);
   if ($callback_value) {
-    if ($callback_value =~ /^\w+$/) {
+    if ($callback_value =~ /^[.\w]+$/) {
       $c->res->content_type('text/javascript');
       $c->res->output($callback_value.'('.$c->res->output().');');
     } else {
@@ -25,4 +28,6 @@ after 'execute' => sub {
   }
 };
 
+__PACKAGE__->meta->make_immutable;
+
 1;