diff --git a/plugins/grandtotal b/plugins/grandtotal
index 04ddc22..437068b 100644
--- a/plugins/grandtotal
+++ b/plugins/grandtotal
@@ -12,14 +12,14 @@ sub command :Tab(grandtotal) ($self, $cart, $command, @) {
         my ($username, $balance) = split " ", $line;
         next if RevBank::Users::is_special($username);
 
-        my $credit = $balance;
+        my $credit = RevBank::Amount->parse_string($balance) or next;
         $neg += $credit if $credit < 0;
         $pos += $credit if $credit > 0;
     }
 
-    printf "Total positive: %8.2f\n", $pos;
-    printf "Total negative: \e[31;1m%8.2f\e[0m\n", $neg;
-    printf "GRAND TOTAL:    \e[1m%8.2f\e[0m\n", $pos + $neg;
+    printf "Total positive: %8s\n", $pos;
+    printf "Total negative: \e[31;1m%8s\e[0m\n", $neg;
+    printf "GRAND TOTAL:    \e[1m%8s\e[0m\n", $pos + $neg;
 
     return ACCEPT;
 }
diff --git a/revbank b/revbank
index 78e9028..2ea3379 100755
--- a/revbank
+++ b/revbank
@@ -16,7 +16,7 @@ use RevBank::Messages;
 use RevBank::Cart;
 use RevBank::Prompt;
 
-our $VERSION = "6.1.2";
+our $VERSION = "6.1.3";
 our %HELP1 = (
     "abort" => "Abort the current transaction",
 );