diff --git a/server/db.rkt b/server/db.rkt index 2ef0835..55542b6 100644 --- a/server/db.rkt +++ b/server/db.rkt @@ -8,8 +8,6 @@ redis-conn mysql-conn) - -;; This should be a racket parameter (define (connect-redis) (make-redis)) @@ -26,4 +24,6 @@ #:password sql-pass #:database "db_webqtl_s")) -(define mysql-conn (make-parameter (connect-sql))) +(define mysql-conn + (make-parameter + (virtual-connection connect-sql)))