Remove ubiquitous

Author: quicklisp

config.lisp

@@ -2,11 +2,18 @@
 
 (in-package #:quicklisp-controller)
 
-(eval-when (:compile-toplevel :load-toplevel :execute)
-  (ubiquitous:restore 'quicklisp-controller))
+(defun config-value (name)
+  (let* ((base "quicklisp-controller:config;value.txt")
+	 (file (make-pathname :name name :defaults base)))
+    (when (probe-file file)
+      (with-open-file (stream file)
+	(read-line stream)))))
 
-(defvar *report-to-email* (ubiquitous:value 'report-to-email)
+
+(defvar *report-to-email*
+  (config-value "report-to-email")
   "The email address to which reports are emailed.")
 
-(defparameter githappy:*oauth2-token* (ubiquitous:value 'github-access-token))
+(defparameter githappy:*oauth2-token*
+  (config-value "githappy-token"))
 

quicklisp-controller.asd

@@ -16,7 +16,6 @@
                #:ironclad
                #:lparallel
 	       #:cl-who
-               #:ubiquitous
                #:githappy
                #:project-info
 	       #:westbrook)