diff options
Diffstat (limited to 'destructuring-bind.lisp')
| -rw-r--r-- | destructuring-bind.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/destructuring-bind.lisp b/destructuring-bind.lisp index b819a16..1207649 100644 --- a/destructuring-bind.lisp +++ b/destructuring-bind.lisp @@ -89,7 +89,7 @@ (keyword-name (if (and (consp head) (consp (car head))) (caar head) - (intern (symbol-name var) '#:keyword)))) + (intern (symbol-name var) (find-package '#:keyword))))) `(let* ((,sym ,expression) (,value-sym (getf ,sym ,keyword-name ',missing)) ,@(cond ((atom head) |