diff --git a/src/clj/joy/q.clj b/src/clj/joy/q.clj
index d1bb93b..087b33f 100644
--- a/src/clj/joy/q.clj
+++ b/src/clj/joy/q.clj
@@ -13,7 +13,7 @@
          (recur (list*
                  (filter smaller? xs)       ;; #: Work all < pivot
                  pivot                      ;; #: Work pivot itself
-                 (remove smaller? xs)       ;; #: Work all > pivot
+                 (remove smaller? xs)       ;; #: Work all >= pivot
                  parts)))                   ;; #: cancat parts
        (when-let [[x & parts] parts]
          (cons x (sort-parts parts))))))) ;; #: Sort rest if more parts
@@ -33,4 +33,4 @@
   (qsort (rand-ints 20))
 
   (take 10 (qsort (rand-ints 10000)))
-)
\ No newline at end of file
+)