From e76bd58c53d22d366bd78bc6eb864bac583b68de Mon Sep 17 00:00:00 2001
From: Martin Gasbichler <gasbichl@informatik.uni-tuebingen.de>
Date: Wed, 5 Apr 2006 05:36:23 +0000
Subject: [PATCH] Add missing %cpu to ps call on Darwin. Noted by Taylor
 Campbell

---
 scsh/pps/pps.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scsh/pps/pps.scm b/scsh/pps/pps.scm
index e715369..8eb1cc8 100644
--- a/scsh/pps/pps.scm
+++ b/scsh/pps/pps.scm
@@ -116,7 +116,7 @@
   (let ((res (run/strings 
 	      (ps -axww 
 		  ;; uses rgid instead of gid
-		  "-opid,ppid,user,ruid,uid,svuid,rgid,svgid,time,tty,ucomm,command"))))
+		  "-opid,ppid,user,ruid,uid,svuid,rgid,svgid,time,%cpu,tty,ucomm,command"))))
     (if (null? res)
 	(error "ps failed")
 	(cdr res))))