summaryrefslogtreecommitdiff
path: root/logikorr.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'logikorr.lisp')
-rw-r--r--logikorr.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/logikorr.lisp b/logikorr.lisp
index 9e34a9c..e406007 100644
--- a/logikorr.lisp
+++ b/logikorr.lisp
@@ -12,9 +12,9 @@
(defparameter *directory* "/Users/mulk/Dropbox/Projekte/Logikorr/")
(defparameter *in-locked-context-p* nil)
-(defvar *lock* (merge-pathnames #p".mulk-db-lock" *database*))
(defvar *students* nil)
-(defvar *database* (merge-pathnames "blatt3.txt"))
+(defvar *database* (merge-pathnames "blatt3.txt" *directory*))
+(defvar *lock* (merge-pathnames #p".mulk-db-lock" *database*))
(setq *hunchentoot-default-external-format*
(flexi-streams:make-external-format :utf-8))