From: Stefan Monnier Date: Wed, 16 Apr 2008 03:09:58 +0000 (+0000) Subject: (proced-command-alist): Add support for darwin. X-Git-Tag: emacs-pretest-23.0.90~6256 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f5b0081187b38a4ddf71ae631453ddbe6e2e167e;p=emacs.git (proced-command-alist): Add support for darwin. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 106ed5d2107..d5e033daf41 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2008-04-16 Markus Triska + + * proced.el (proced-command-alist): Add support for darwin. + 2008-04-16 Stefan Monnier * proced.el (proced-mode): Redefine as just the major-mode. 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))))