diff --git a/scsh/procobj.scm b/scsh/procobj.scm index 542cf43..58ada9c 100644 --- a/scsh/procobj.scm +++ b/scsh/procobj.scm @@ -296,8 +296,7 @@ (cond ((maybe-pid->proc pid) => (lambda (proc) (obituary proc status) - (push-reaped-proc proc))) - (else (warn "reaped pid had no procobj" pid)))) + (push-reaped-proc proc))))) ;;; All you have to do, if a wait on proc was successful