From e5fe9cdeecdb366529fb9d59f5f7d99b78e38dbf Mon Sep 17 00:00:00 2001
From: Chris Wilson <chris+github@qwirx.com>
Date: Tue, 11 Nov 2008 00:26:11 +0000
Subject: Additional debugging for value format error reported by Scott McNee.

---
 contrib/bbadmin/accounts.cgi | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'contrib')

diff --git a/contrib/bbadmin/accounts.cgi b/contrib/bbadmin/accounts.cgi
index d98d4a7a..d68b82c6 100755
--- a/contrib/bbadmin/accounts.cgi
+++ b/contrib/bbadmin/accounts.cgi
@@ -345,7 +345,8 @@ print $cgi->Tr(
 sub human_format($)
 {
 	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;
 	my $units = $2;
-- 
cgit v1.2.3