aboutsummaryrefslogtreecommitdiff
path: root/src/propspec.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/propspec.lisp')
-rw-r--r--src/propspec.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/propspec.lisp b/src/propspec.lisp
index 67e8c18..dec1c3e 100644
--- a/src/propspec.lisp
+++ b/src/propspec.lisp
@@ -269,7 +269,7 @@ expression."
(multiple-value-bind (forms declarations docstring)
(parse-body body :documentation t)
`(defun ,name ,args
- ,@docstring
+ ,@(and docstring `(,docstring))
,@declarations
(flet ((:retprop (&rest all &key args &allow-other-keys)
(let ((psym (gensym ,(symbol-name name)))