simplify case clauses

cemerick · Aug 18, 2011 · cb1d00f · cb1d00f
1 parent 6ae1201
commit cb1d00f
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 5 deletions.
diff --git a/pom.xml b/pom.xml
@@ -29,7 +29,7 @@
     </scm>
 
     <properties>
-        <clojure.version>1.2.0</clojure.version>
+        <clojure.version>1.3.0-beta1</clojure.version>
     </properties>
 
     <dependencies>
@@ -41,7 +41,7 @@
         <dependency>
             <groupId>com.cemerick</groupId>
             <artifactId>utc-dates</artifactId>
-            <version>0.0.1</version>
+            <version>0.0.2</version>
         </dependency>
     </dependencies>
 

diff --git a/src/main/clojure/cemerick/rummage.clj b/src/main/clojure/cemerick/rummage.clj
@@ -276,9 +276,9 @@
 
 (def ^{:private true} query-language
   {:select #(case (strip-symbol-ns %)
-              '* "*"
-              'id "itemName()"
-              'count "count(*)"
+              * "*"
+              id "itemName()"
+              count "count(*)"
               (if-not (coll? %)
                 (throw (IllegalArgumentException. (str "invalid attribute spec: " %)))
                 (->> (map strip-symbol-ns %)
@@ -436,3 +436,4 @@
     ; can't imagine when one wouldn't want to minimize round-trips when obtaining all results
     (if (map? q) (assoc q :limit 2500) q)
     nil))
+