diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-21 16:53:42 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-21 17:22:25 -0700 |
| commit | f2beedb8e9db72c3933d3c66c68eebcab6816566 (patch) | |
| tree | 3fc9e5a070169796071344df6e0597e439a9bddf /src/propspec.lisp | |
| parent | 21a058c24aff5e4f800f844a73548a6ed6643a38 (diff) | |
| download | consfigurator-f2beedb8e9db72c3933d3c66c68eebcab6816566.tar.gz | |
fix docstrings in DEFINE-FUNCTION-PROPERTY-COMBINATOR
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/propspec.lisp')
| -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))) |