From 52ee0535dba9c273f5af93df2eb436473b9f936b Mon Sep 17 00:00:00 2001 From: Stuart Sierra Date: Fri, 5 Dec 2008 15:31:53 +0000 Subject: fcase.clj: fixed private symbol used by in-case (report by T. Roussanov) --- src/clojure/contrib/fcase.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/clojure/contrib/fcase.clj b/src/clojure/contrib/fcase.clj index 7e21b7c9..5fdcb2f2 100644 --- a/src/clojure/contrib/fcase.clj +++ b/src/clojure/contrib/fcase.clj @@ -80,7 +80,7 @@ [test-value & clauses] `(fcase instance? ~test-value ~@clauses)) -(defn- in-case-test [test-seq case-value] +(defn in-case-test [test-seq case-value] (some (fn [item] (= item case-value)) test-seq)) -- cgit v1.2.3-70-g09d2