|  | @@ -28,15 +28,9 @@
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  (defn compare-schema-version
 | 
	
		
			
				|  |  |    [x y]
 | 
	
		
			
				|  |  | -  (if (schema-version? x)
 | 
	
		
			
				|  |  | -    (cond
 | 
	
		
			
				|  |  | -      (number? y) (compare (:major x) y)
 | 
	
		
			
				|  |  | -      (sequential? y) (compare [(:major x) (:minor x)] [(first y) (second y)])
 | 
	
		
			
				|  |  | -      (schema-version? y)
 | 
	
		
			
				|  |  | -      (apply compare (map (juxt :major :minor) [x y]))
 | 
	
		
			
				|  |  | -      :else
 | 
	
		
			
				|  |  | -      (throw (js/Error. (str "Cannot compare " x " to " y))))
 | 
	
		
			
				|  |  | -    (compare-schema-version (parse-schema-version x) y)))
 | 
	
		
			
				|  |  | +  (apply compare
 | 
	
		
			
				|  |  | +         (map (juxt :major :minor)
 | 
	
		
			
				|  |  | +              [(parse-schema-version x) (parse-schema-version y)])))
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  (def version (parse-schema-version "64.1"))
 | 
	
		
			
				|  |  |  
 |