From e50e2acde039f8a16373c653aaa1e76b37bd02a2 Mon Sep 17 00:00:00 2001
From: Vincent Ambo <tazjin@gmail.com>
Date: Tue, 26 Dec 2017 11:13:52 +0100
Subject: [PATCH] docs: Add example configuration file

---
 config.lisp    | 21 +++++++++++++++++++++
 src/gemma.lisp | 21 +--------------------
 2 files changed, 22 insertions(+), 20 deletions(-)
 create mode 100644 config.lisp

diff --git a/config.lisp b/config.lisp
new file mode 100644
index 000000000..54f8e5f34
--- /dev/null
+++ b/config.lisp
@@ -0,0 +1,21 @@
+;; Example configuration file for Gemma
+
+(config :port 4242
+        :data-dir "/tmp/gemma/")
+
+(deftask bathroom/wipe-mirror 7)
+(deftask bathroom/wipe-counter 7)
+
+;; Bedroom tasks
+(deftask bedroom/change-sheets 7)
+(deftask bedroom/vacuum 10)
+
+;; Kitchen tasks
+(deftask kitchen/normal-trash 3)
+(deftask kitchen/green-trash 5)
+(deftask kitchen/blue-trash 5)
+(deftask kitchen/wipe-counters 3)
+(deftask kitchen/vacuum 5 "Kitchen has more crumbs and such!")
+
+;; Entire place
+(deftask clean-windows 60)
diff --git a/src/gemma.lisp b/src/gemma.lisp
index 2ead8f9ab..a925e65a7 100644
--- a/src/gemma.lisp
+++ b/src/gemma.lisp
@@ -149,26 +149,6 @@ maximum interval."
      (complete-task key)
      (encode-json-to-string (response-for (get-task key))))))
 
-;; (not-so) example tasks
-
-;; Bathroom tasks
-(deftask bathroom/wipe-mirror 7)
-(deftask bathroom/wipe-counter 7)
-
-;; Bedroom tasks
-(deftask bedroom/change-sheets 7)
-(deftask bedroom/vacuum 10)
-
-;; Kitchen tasks
-(deftask kitchen/normal-trash 3)
-(deftask kitchen/green-trash 5)
-(deftask kitchen/blue-trash 5)
-(deftask kitchen/wipe-counters 3)
-(deftask kitchen/vacuum 5 "Kitchen has more crumbs and such!")
-
-;; Entire place
-(deftask clean-windows 60)
-
 ;; Experimentation / testing stuff
 
 (defun randomise-completion-times ()
@@ -186,3 +166,4 @@ maximum interval."
           (cl-prevalence:find-all-objects *p-tasks* 'task)))
 
 ;; (randomise-completion-times)
+