diff options
-rw-r--r-- | FS/FS/UI/Web.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/FS/FS/UI/Web.pm b/FS/FS/UI/Web.pm index 49e3fbf7e..dc45e0188 100644 --- a/FS/FS/UI/Web.pm +++ b/FS/FS/UI/Web.pm @@ -131,6 +131,7 @@ package FS::UI::Web::JSRPC; use strict; use vars qw($DEBUG); +use Carp; use Storable qw(nfreeze); use MIME::Base64; use JSON; @@ -150,7 +151,7 @@ sub new { bless $self, $class; - die "CGI object required as second argument" unless $self->{'cgi'}; + croak "CGI object required as second argument" unless $self->{'cgi'}; return $self; } |