Index: Makefile
==================================================================
--- Makefile
+++ Makefile
@@ -7,11 +7,11 @@
 #  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
 #  PURPOSE.
 
 include install.cfg
 
-SRCFILES    = stml.scm misc-stml.scm session.scm sqltbl.scm formdat.scm setup.scm stmlrun.scm keystore.scm html-filter.scm cookie.scm
+SRCFILES    = stml.scm misc-stml.scm session.scm sqltbl.scm formdat.scm setup.scm stmlrun.scm keystore.scm html-filter.scm cookie.scm 
 MODULEFILES = $(wildcard modules/*/*-mod.scm)
 SOFILES     = $(MODULEFILES:%.scm=%.so)
 CFILES      = $(MODULEFILES:%.scm=%.c)
 OFILES      = $(SRCFILES:%.scm=%.o)
 TARGFILES   = $(notdir $(SOFILES))

Index: session.scm
==================================================================
--- session.scm
+++ session.scm
@@ -307,11 +307,11 @@
 ;; returns session key IFF it is in the HTTP_COOKIE 
 (define (session:extract-session-key self)
   (let ((http-cookie (get-environment-variable "HTTP_COOKIE")))
     (if http-cookie
         (session:extract-key-from-param self (string-split-fields  ";\\s+" http-cookie infix:) "session_key")
-        )))
+        #f)))
 
 (define (session:get-session-id self session-key)
   (let ((query "SELECT id FROM sessions WHERE session_key=?;")
         (result #f))
     ;;     (pg:query-for-each (lambda (tuple)

Index: stmlrun.scm
==================================================================
--- stmlrun.scm
+++ stmlrun.scm
@@ -10,11 +10,10 @@
 ;;  PURPOSE.
 
 ;; (require-extension syntax-case)
 ;; (declare (run-time-macros))
 
-(require-library dbi)
 
 (include "requirements.scm")
 (declare (uses cookie))
 (declare (uses html-filter))
 (declare (uses misc-stml))