Skip to content
Browse files

fix tg-utils::plist-comparator

  • Loading branch information...
1 parent f7eb5ec commit fc9fa578eaf8e7c540a10479eff37e7e12b83194 @avodonosov avodonosov committed Mar 16, 2013
Showing with 2 additions and 2 deletions.
  1. +2 −2 utils/utils.lisp
View
4 utils/utils.lisp
@@ -3,7 +3,7 @@
;;;; See LICENSE for details.
(defpackage #:test-grid-utils
- (:nicknames :tg-utils)
+ (:nicknames #:tg-utils)
(:use :cl)
(:export #:set=))
@@ -64,7 +64,7 @@
accessors-and-predicates)))
(defun plist-comparator (&rest props-and-predicates)
- (funcall #'obj-comparator (map-plist #'property-comparator props-and-predicates)))
+ (lexicographical-comparator (map-plist #'property-comparator props-and-predicates)))
;; examples:
#|

0 comments on commit fc9fa57

Please sign in to comment.
Something went wrong with that request. Please try again.