# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1487338473 0
# Node ID c31f22ad19d56ac99180aaef990e6dd6f1b769f9
# Parent  221dc09d73f96ff2392d203d47f4a1ff96e66f95
Update quickutils package bullshit

diff -r 221dc09d73f9 -r c31f22ad19d5 temperance.asd
--- a/temperance.asd	Fri Feb 17 13:31:15 2017 +0000
+++ b/temperance.asd	Fri Feb 17 13:34:33 2017 +0000
@@ -15,7 +15,8 @@
   :serial t
   :components ((:module "vendor"
                 :serial t
-                :components ((:file "quickutils")))
+                :components ((:file "quickutils-package")
+                             (:file "quickutils")))
                (:file "package")
                (:module "src"
                 :serial t
diff -r 221dc09d73f9 -r c31f22ad19d5 vendor/quickutils-package.lisp
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/vendor/quickutils-package.lisp	Fri Feb 17 13:34:33 2017 +0000
@@ -0,0 +1,12 @@
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (unless (find-package "TEMPERANCE.QUICKUTILS")
+    (defpackage "TEMPERANCE.QUICKUTILS"
+      (:documentation "Package that contains Quickutil utility functions.")
+      (:use :cl))))
+
+(in-package "TEMPERANCE.QUICKUTILS")
+
+;; need to define this here so sbcl will shut the hell up about it being
+;; undefined when compiling quickutils.lisp.  computers are trash.
+(defparameter *utilities* nil)
+