hg.stevelosh.com > cl-losh

3c0ce7d959f9 

Fix docstring
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Mon, 15 Aug 2016 04:42:11 +0000
parents f71d1be7cd2f
children 5ef5b5b223ed
branches/tags (none)
files losh.lisp

Changes

--- a/losh.lisp	Mon Aug 15 04:37:02 2016 +0000
+++ b/losh.lisp	Mon Aug 15 04:42:11 2016 +0000
@@ -953,7 +953,7 @@
     =>
     (defmacro with-foo ((foo &optional (a-symbol 'a) (b-symbol 'b))
                         &body body)
-      `(with-accessors ((,a-symbol 'foo-a) (,b-symbol 'foo-b))
+      `(with-accessors ((,a-symbol foo-a) (,b-symbol foo-b))
            ,foo
          ,@body))