git.fiddlerwoaroof.com
Browse code

Change a destructuring-case default branch

Fernando Borretti authored on 30/03/2015 21:07:05
Showing 1 changed files
... ...
@@ -121,8 +121,7 @@
121 121
                           (alexandria:plist-hash-table con :test #'equal))))))
122 122
         ;; Do nothing
123 123
         ((t &rest rest)
124
-         (declare (ignore rest))
125
-         t)))
124
+         (declare (ignore rest)))))
126 125
     (first contexts)))
127 126
 
128 127
 ;;; The public interface