From aa3ad8e117534f4c59d9658e4d0d6791d13fce54 Mon Sep 17 00:00:00 2001
From: Ryan Pavlik <rpavlik@gmail.com>
Date: Wed, 25 Jun 2014 17:06:31 -0500
Subject: [PATCH] Use DEFPARAMTER instead of DEFINE-CONSTANT

---
 colors.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/colors.lisp b/colors.lisp
index 6399f58..912c7ae 100644
--- a/colors.lisp
+++ b/colors.lisp
@@ -156,6 +156,6 @@ combination is in the positive or negative direction on the color wheel."
 the automatically generated color file."
   (let ((constant-name (symbolicate #\+ name #\+)))
     `(progn
-       (define-constant ,constant-name (rgb ,red ,green ,blue)
-         :test #'equalp :documentation ,(format nil "X11 color ~A." name))
+       (defparameter ,constant-name (rgb ,red ,green ,blue)
+         ,(format nil "X11 color ~A." name))
        (export ',constant-name))))