From b29780b983dd91fb679e8d01b91902b0ce186e9f Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 10 Mar 2006 22:28:17 +0000
Subject: [PATCH] want to know who *called* this without the required second
 arg

---
 FS/FS/UI/Web.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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;
 }
-- 
2.11.0