From 317658754c63e75dd788bcdc421c68eba9419be9 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Fri, 27 Nov 2009 11:40:32 +0100
Subject: Do not hard-code the data directory.

---
 logikorr.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/logikorr.lisp b/logikorr.lisp
index 708ddbe..0577d9f 100644
--- a/logikorr.lisp
+++ b/logikorr.lisp
@@ -11,7 +11,7 @@
   (last-name "" :type (or string null))
   (first-name "" :type (or string null)))
 
-(defparameter *directory* #p"/Users/mulk/Dropbox/Projekte/Logikorr/")
+(defparameter *directory* (asdf:component-pathname (asdf:find-system '#:logikorr)))
 (defparameter *in-locked-context-p* nil)
 
 (defvar *students* nil)
-- 
cgit v1.2.3