From 659523d689ae252c588c882588a11f02473070c8 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Mon, 27 Jun 2022 12:52:25 -0500 Subject: [typo] --- hyperquirks.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'hyperquirks.lisp') diff --git a/hyperquirks.lisp b/hyperquirks.lisp index 7c1f8e9..408a47b 100644 --- a/hyperquirks.lisp +++ b/hyperquirks.lisp @@ -159,7 +159,7 @@ some other package. (or (getf ,plist-var ,(intern (symbol-name (second var)) 'keyword)) (getf ,plist-var ',var))) else - collect `(,var (or (getf ,plist-var ,(intern (symbol-name var) 'keywword)) + collect `(,var (or (getf ,plist-var ,(intern (symbol-name var) 'keyword)) (getf ,plist-var ',var)))))) `(let ((,plist-var ,plist)) (let ,bindings -- cgit v1.2.3