@@ -1445,21 +1445,19 @@
 
 ;; why get the keys from the db? why not get from the *configdat*
 ;; using keys:config-get-fields?
 
 (define (db:get-keys dbstruct)
-  (if *db-keys* *db-keys* 
-      (let ((res '()))
-	(db:with-db dbstruct #f #f
-		    (lambda (db)
-		      (sqlite3:for-each-row 
-		       (lambda (key)
-			 (set! res (cons key res)))
-		       db
-		       "SELECT fieldname FROM keys ORDER BY id DESC;")))
-	(set! *db-keys* res)
-	res)))
+  (let ((res '()))
+    (db:with-db dbstruct #f #f
+		(lambda (db)
+		  (sqlite3:for-each-row 
+		   (lambda (key)
+		     (set! res (cons key res)))
+		   db
+		   "SELECT fieldname FROM keys ORDER BY id DESC;")))
+    res))
 
 ;; look up values in a header/data structure
 (define (db:get-value-by-header row header field)
   (if (null? header) #f
       (let loop ((hed (car header))