@@ -46,11 +46,11 @@
 	     (close-input-port fh)
 	     (close-input-port fhe)
 	     (close-output-port fho)
 	     result))))) ;; )
 
-(define (cmd-run-proc-each-line cmd proc . params)
+(define (process:cmd-run-proc-each-line cmd proc . params)
   ;; (print "Called with cmd=" cmd ", proc=" proc ", params=" params)
   (handle-exceptions
    exn
    (begin
      (print "ERROR:  Failed to run command: " cmd " " (string-intersperse params " "))
@@ -69,17 +69,17 @@
 	     (close-input-port fh)
 	     (close-input-port fhe)
 	     (close-output-port fho)
 	     result))))))
 
-(define (cmd-run-proc-each-line-alt cmd proc)
+(define (process:cmd-run-proc-each-line-alt cmd proc)
   (let* ((fh (open-input-pipe cmd))
          (res (port-proc->list fh proc))
          (status (close-input-pipe fh)))
     (if (eq? status 0) res #f)))
 
-(define (cmd-run->list cmd)
+(define (process:cmd-run->list cmd)
   (let* ((fh (open-input-pipe cmd))
          (res (port->list fh))
          (status (close-input-pipe fh)))
     (list res status)))