From 714341b1e3bdbffb0d41a54b30a33d65a12546aa Mon Sep 17 00:00:00 2001
From: Araq <rumpf_a@web.de>
Date: Wed, 10 Oct 2012 01:05:03 +0200
Subject: [PATCH] bugfix: leak in db_sqlite.GetValue

---
 src/db_sqlite.nim | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/src/db_sqlite.nim b/src/db_sqlite.nim
index 5196e4807c..d3ff3c0d25 100755
--- a/src/db_sqlite.nim
+++ b/src/db_sqlite.nim
@@ -130,9 +130,11 @@ proc GetValue*(db: TDbConn, query: TSqlQuery,
   var stmt = setupQuery(db, query, args)
   if step(stmt) == SQLITE_ROW:
     let cb = column_bytes(stmt, 0)
-    if cb == 0: return ""
-    result = newStringOfCap(cb)
-    add(result, column_text(stmt, 0))
+    if cb == 0: 
+      result = ""
+    else:
+      result = newStringOfCap(cb)
+      add(result, column_text(stmt, 0))
     if finalize(stmt) != SQLITE_OK: dbError(db)
   else:
     result = ""