# HG changeset patch # User Steve Losh # Date 1483997303 0 # Node ID c8bb1f3ec2e56c899b71bf09b365031fe21048ca # Parent c8a2b5ade9f88c213c014d818549c73bf55af584 Fix fset thing diff -r c8a2b5ade9f8 -r c8bb1f3ec2e5 src/utils.lisp --- a/src/utils.lisp Sun Nov 20 18:02:44 2016 +0000 +++ b/src/utils.lisp Mon Jan 09 21:28:23 2017 +0000 @@ -5,8 +5,7 @@ (defun make-map (&rest keyvals) "Create an fset map of the `keyvals` plist of keys and values." - (fset:convert 'fset:map (plist-alist keyvals) - :from-type 'alist)) + (fset:convert 'fset:map (plist-alist keyvals))) (defun with-when (map &rest keyvals) "Add the items in the `keyvals` plist with non-nil values to `map`."