@@ -147,11 +147,11 @@
 (define (config-lookup cfgdat section var)
   (let ((sectdat (hash-table-ref/default cfgdat section '())))
     (if (null? sectdat)
 	#f
 	(let ((match (assoc var sectdat)))
-	  (if match
+	  (if match ;; (and match (list? match)(> (length match) 1))
 	      (cadr match)
 	      #f))
 	)))
 
 (define (configf:section-vars cfgdat section)