[svn:modperl-modules] rev 197 - Apache-Scoreboard-2.0/trunk/lib/Apache

Author: stas
Date: Mon Mar 21 10:54:24 2005
New Revision: 197

Modified:
   Apache-Scoreboard-2.0/trunk/lib/Apache/Scoreboard.pm
Log:
croak if $url to fetch is not passed


Modified: Apache-Scoreboard-2.0/trunk/lib/Apache/Scoreboard.pm
==============================================================================
--- Apache-Scoreboard-2.0/trunk/lib/Apache/Scoreboard.pm	(original)
+++ Apache-Scoreboard-2.0/trunk/lib/Apache/Scoreboard.pm	Mon Mar 21 10:54:24 2005
@@ -31,6 +31,8 @@
 sub http_fetch {
     my($self, $url) = @_;
 
+    Carp::croak("no url argument was passed") unless $url;
+
     require LWP::UserAgent;
     unless ($ua) {
 	no strict 'vars';