fixed Symbol.compareTo

1 files changed, 8 insertions, 5 deletions

diff --git a/src/jvm/clojure/lang/Symbol.java b/src/jvm/clojure/lang/Symbol.java
index 248b3aa7..acc5ca2f 100644
--- a/src/jvm/clojure/lang/Symbol.java
+++ b/src/jvm/clojure/lang/Symbol.java
@@ -95,11 +95,14 @@ public int compareTo(Object o){
 		return 0;
 	if(this.ns == null && s.ns != null)
 		return -1;
-	if(this.ns != null && s.ns == null)
-		return 1;
-	int nsc = this.name.compareTo(s.name);
-	if(nsc != 0)
-		return nsc;
+	if(this.ns != null)
+		{
+		if(s.ns == null)
+			return 1;
+		int nsc = this.ns.compareTo(s.ns);
+		if(nsc != 0)
+			return nsc;
+		}
 	return this.name.compareTo(s.name);
 }