aboutsummaryrefslogtreecommitdiff
path: root/src/property.lisp
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-06-25 09:08:19 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-06-25 16:10:57 -0700
commit7dd46c56b01355e506d6054ecc73fe2e388773aa (patch)
tree3fbf20ff62bcecac33b873dfeedae99cad124df9 /src/property.lisp
parent4d935e3886a3545d89b7bf89c3405f251b1e15d2 (diff)
downloadconsfigurator-7dd46c56b01355e506d6054ecc73fe2e388773aa.tar.gz
fix use of MEMBER in PROPAPPARGS
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property.lisp')
-rw-r--r--src/property.lisp2
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)))