Changeset 2376

Timestamp:

11/11/2008 00:26:11 (22 months ago)

Author:

chris

Message:

Additional debugging for value format error reported by Scott McNee?.

Files:

• box/trunk/contrib/bbadmin/accounts.cgi (modified) (1 diff)

box/trunk/contrib/bbadmin/accounts.cgi

@@ -346 +346 @@
 {
         my ($kb) = @_;
-        die unless $kb =~ /^(\d+) (kB)$/;
+        die "bad format in value: expected number followed by kB, " .
+                "found '$kb'" unless $kb =~ /^(\d+) (kB)$/;
 
         my $value = $1;