From 302c9f5749afd7ebd40a6f180874a14e78b5d035 Mon Sep 17 00:00:00 2001
From: adamch <adamch>
Date: Wed, 26 Jul 2006 01:22:54 +0000
Subject: [PATCH] Fix an SQL bug in the wake of adding shares

---
 balance.sml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/balance.sml b/balance.sml
index bd5f4b0..9a1f8b6 100644
--- a/balance.sml
+++ b/balance.sml
@@ -64,7 +64,7 @@ fun balanceNameToId name =
       | _ => NONE
 
 fun listBalanceUsers bal =
-    C.map (getDb ()) mkUserRow ($`SELECT id, name, rname, bal, joined, app
+    C.map (getDb ()) mkUserRow ($`SELECT id, name, rname, bal, joined, app, shares
 			          FROM WebUser
 				  WHERE bal = ^(C.intToSql bal)
 			          ORDER BY name`)
-- 
2.20.1