diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-04-16 03:09:58 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-04-16 03:09:58 +0000 |
commit | f5b0081187b38a4ddf71ae631453ddbe6e2e167e (patch) | |
tree | 405063ba57ff838f740cb1030c0007ec305ea153 /lisp/proced.el | |
parent | 079ba9b790ab68ed2fbda83c68560b4752d3b8fe (diff) | |
download | emacs-f5b0081187b38a4ddf71ae631453ddbe6e2e167e.tar.gz |
(proced-command-alist): Add support for darwin.
Diffstat (limited to 'lisp/proced.el')
-rw-r--r-- | lisp/proced.el | 3 |
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)))) |