[svn:modperl-modules] rev 198 - Apache-Scoreboard-1.0/trunk

Author: stas
Date: Mon Mar 21 10:56:08 2005
New Revision: 198

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


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