summaryrefslogtreecommitdiff
path: root/lisp/proced.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2008-04-16 03:09:58 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2008-04-16 03:09:58 +0000
commitf5b0081187b38a4ddf71ae631453ddbe6e2e167e (patch)
tree405063ba57ff838f740cb1030c0007ec305ea153 /lisp/proced.el
parent079ba9b790ab68ed2fbda83c68560b4752d3b8fe (diff)
downloademacs-f5b0081187b38a4ddf71ae631453ddbe6e2e167e.tar.gz
(proced-command-alist): Add support for darwin.
Diffstat (limited to 'lisp/proced.el')
-rw-r--r--lisp/proced.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/proced.el b/lisp/proced.el
index 126efdc5587..f6e6c94e166 100644
--- a/lisp/proced.el
+++ b/lisp/proced.el
@@ -62,6 +62,9 @@
("emacs" ("ps" "--pid" ,(number-to-string (emacs-pid))
"--ppid" ,(number-to-string (emacs-pid))
"uwww") 2)))
+ ((memq system-type '(darwin))
+ `(("user" ("ps" "-u" ,(number-to-string (user-uid))) 2)
+ ("all" ("ps" "-Au") 2)))
(t ; standard syntax doesn't allow us to list running processes only
`(("user" ("ps" "-fu" ,(number-to-string (user-uid))) 2)
("all" ("ps" "-ef") 2))))