Removed debugging print.

Pascal J. Bourguignon [2012-02-24 02:36]
Removed debugging print.
Filename
common-lisp/cesarum/utility.lisp
diff --git a/common-lisp/cesarum/utility.lisp b/common-lisp/cesarum/utility.lisp
index 9e13016..8395517 100644
--- a/common-lisp/cesarum/utility.lisp
+++ b/common-lisp/cesarum/utility.lisp
@@ -853,7 +853,7 @@ NOTE:    This version avoids calling FUN twice with the same argument.
       :then (delete-duplicates (join (cons follows (mapcar fun newbies))))
       :for newbies = (set-difference follows set)
       :while newbies
-      :do (print (list 'newbies newbies))
+       ;; :do (print (list 'newbies newbies))
       :do (setf set (append newbies set))
       :finally (return set))))
ViewGit