X-Git-Url: https://git.hcoop.net/clinton/lisp-on-lines.git/blobdiff_plain/e8fd1a9a2f3b68a8aee14b8776ff8398ba717eef..a3006fa0392b8bc1464e9917b8b820554b8f4a35:/src/attribute.lisp

diff --git a/src/attribute.lisp b/src/attribute.lisp
index 7273260..a229aa3 100644
--- a/src/attribute.lisp
+++ b/src/attribute.lisp
@@ -327,7 +327,7 @@
 (defmacro with-attributes (names description &body body)
   `(let ,(loop for name in names collect 
 	      (list name `(find-attribute ,description ',name)))
-     ,@body))q
+     ,@body))