diff options
-rw-r--r-- | src/propspec.lisp | 2 |
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))) |