diff options
-rw-r--r-- | src/property.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/property.lisp b/src/property.lisp index d23fd99..ee362ab 100644 --- a/src/property.lisp +++ b/src/property.lisp @@ -64,7 +64,7 @@ :posix)) (defun propappargs (propapp) - (if (member :orig-args (cadr propapp)) + (if (and (listp (cadr propapp)) (member :orig-args (cadr propapp))) (getf (cadr propapp) :orig-args) (cdr propapp))) |