diff --git a/scsh/procobj.scm b/scsh/procobj.scm
index 59a55a6..542cf43 100644
--- a/scsh/procobj.scm
+++ b/scsh/procobj.scm
@@ -147,7 +147,7 @@
 
 ;;; New (scsh 0.6)
 ;;; we don't register the post/gc-handler until the first police change
-(define (install-autoreaping)
+(define (install-autoreaping) 
   (let ((setter (low-interrupt-register interrupt/chld early-sigchld-handler)))
     (set! *autoreap-policy* 'early)
     (set! sigchld-setter setter)))
@@ -207,15 +207,13 @@
 ;;;   Return true if no more outstanding children; #f if some still live.
 
 (define (reap-zombies)
-  (display "reap-zombies was called" (current-error-port))
-  (newline)
   (let lp ()
     (receive (pid status) (%wait-any (bitwise-ior wait/poll 
 						  wait/stopped-children))
       (if pid
 	  (begin (waited-by-reap pid status)
-		 (format (current-error-port)
-			 "Reaping ~d[~d]~%" pid status)
+;		 (format (current-error-port)
+;			 "Reaping ~d[~d]~%" pid status)
 		 (lp))
 	  status))))