]> git.eshelyaron.com Git - emacs.git/commitdiff
Rename `system-process-attributes' to `process-attributes'
authorMiles Bader <miles@gnu.org>
Mon, 23 Feb 2009 05:06:36 +0000 (05:06 +0000)
committerMiles Bader <miles@gnu.org>
Mon, 23 Feb 2009 05:06:36 +0000 (05:06 +0000)
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1553

doc/lispref/ChangeLog
doc/lispref/processes.texi
etc/ChangeLog
etc/NEWS
lisp/ChangeLog
lisp/proced.el
lisp/server.el
src/ChangeLog
src/process.c

index 618336b3aedd9fe6a549812e1a65c45a95e25866..e2acc24c2a613bcad20fd7b69f7f819865409b6a 100644 (file)
@@ -1,3 +1,8 @@
+2009-02-23  Miles Bader  <miles@gnu.org>
+
+       * processes.texi (System Processes): Rename `system-process-attributes'
+       to `process-attributes'.
+
 2009-02-22  Chong Yidong  <cyd@stupidchicken.com>
 
        * symbols.texi (Property Lists): Emphasize that property lists are
index ae3246f0d291d1b0125a37c3ea59ac050a5f3a9b..7795ddfc3a0fa77af3fb6b780f43ca7e2904f6c9 100644 (file)
@@ -1644,7 +1644,7 @@ from all the other processes running on the same machine at the same
 time.
 @end defun
 
-@defun system-process-attributes pid
+@defun process-attributes pid
 This function returns an alist of attributes for the process specified
 by its process ID @var{pid}.  Each association in the alist is of the
 form @code{(@var{key} . @var{value})}, where @var{key} designates the
index f5dfc46f3bf6551a7f38b4ebb3aa244be01dabaa..897aaffd958bd6973c60165d195839853c975f4f 100644 (file)
@@ -1,3 +1,7 @@
+2009-02-23  Miles Bader  <miles@gnu.org>
+
+       * NEWS: Rename `system-process-attributes' to `process-attributes'.
+
 2009-02-19  Nick Roberts  <nickrob@snap.net.nz>
 
        * compilation.txt: Add entry for maven.
index 080f52a920ea49fbf1912632d166e87725d89a8a..0b4b19e4bb39e797f65b68fe11de8e2b2b25e4b5 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -1260,7 +1260,7 @@ The default values are ";;;###autoload" and `loaddefs.el',
 respectively.
 
 +++
-** New primitives `list-system-processes' and `system-process-attributes'
+** New primitives `list-system-processes' and `process-attributes'
 let Lisp programs access the processes that are running on the local
 machine.  See the doc strings of these functions for more details.
 Not all platforms support accessing this information; on those that
index cd1776997edddbdc7ea6d50904a4df51202be4ba..ee18b8c55c5087ef23ade04d2c0885eb61c2b5d2 100644 (file)
@@ -1,3 +1,9 @@
+2009-02-23  Miles Bader  <miles@gnu.org>
+
+       * proced.el (proced-process-attributes):
+       * server.el (server-running-p): Rename `system-process-attributes'
+       to `process-attributes'.
+
 2009-02-22  Juri Linkov  <juri@jurta.org>
 
        * dired-aux.el (minibuffer-default-add-dired-shell-commands):
index fc4d6d01cf9d17f196ab05a90611cea8303286fd..38163b17e8bc3f47223c074b1bb7e1389790fa34 100644 (file)
 ;; - allow "sudo kill PID", "renice PID"
 ;;
 ;; Thoughts and Ideas
-;; - Currently, `system-process-attributes' returns the list of
+;; - Currently, `process-attributes' returns the list of
 ;;   command-line arguments of a process as one concatenated string.
 ;;   This format is compatible with `shell-command'.  Also, under
 ;;   MS-Windows, the command-line arguments are actually stored as a
 ;;   single string, so that it is impossible to reverse-engineer it back
-;;   into separate arguments.  Alternatively, `system-process-attributes'
+;;   into separate arguments.  Alternatively, `process-attributes'
 ;;   could (try to) return a list of strings that correspond to individual
 ;;   command-line arguments.  Then one could feed such a list of
 ;;   command-line arguments into `call-process' or `start-process'.
@@ -94,7 +94,7 @@ the external command (usually \"kill\")."
 ;; It would be neat if one could temporarily override the following
 ;; predefined rules.
 (defcustom proced-grammar-alist
-  '( ;; attributes defined in `system-process-attributes'
+  '( ;; attributes defined in `process-attributes'
     (euid    "EUID"    "%d" right proced-< nil (euid pid) (nil t nil))
     (user    "USER"    nil left proced-string-lessp nil (user pid) (nil t nil))
     (egid    "EGID"    "%d" right proced-< nil (egid euid pid) (nil t nil))
@@ -218,7 +218,7 @@ If REFINER is nil no refinement is done."
 This variable extends the functionality of `proced-process-attributes'.
 Each function is called with one argument, the list of attributes
 of a system process.  It returns a cons cell of the form (KEY . VALUE)
-like `system-process-attributes'.  This cons cell is appended to the list
+like `process-attributes'.  This cons cell is appended to the list
 returned by `proced-process-attributes'.
 If the function returns nil, the value is ignored."
   :group 'proced
@@ -1539,7 +1539,7 @@ the process is ignored."
   ;; lists are ignored?  When would such processes be of interest?
   (let (process-alist attributes attr)
     (dolist (pid (or pid-list (list-system-processes)) process-alist)
-      (when (setq attributes (system-process-attributes pid))
+      (when (setq attributes (process-attributes pid))
         (setq attributes (cons (cons 'pid pid) attributes))
         (dolist (fun proced-custom-attributes)
           (if (setq attr (funcall fun attributes))
index 1399b41e8ce193e2d378b21c313f59ed094eb1fe..5e4e6e1548ec679b721c4787da3fe9e8a275fab4 100644 (file)
@@ -595,7 +595,7 @@ Return values:
            (insert-file-contents-literally (expand-file-name name server-auth-dir))
            (or (and (looking-at "127\\.0\\.0\\.1:[0-9]+ \\([0-9]+\\)")
                     (assq 'comm
-                          (system-process-attributes
+                          (process-attributes
                            (string-to-number (match-string 1))))
                     t)
                :other))
index 1f386d977977dfcc68b74d02be67fcfe972ff16a..2a6eb53eb98370374d3718e0a30a1a576c4a661d 100644 (file)
@@ -1,3 +1,9 @@
+2009-02-23  Miles Bader  <miles@gnu.org>
+
+       * process.c (Flist_system_processes, Fprocess_attributes)
+       (syms_of_process): Rename `system-process-attributes' to
+       `process-attributes'.
+
 2009-02-22  Andreas Schwab  <schwab@linux-m68k.org>
 
        * coding.h (struct coding_system): Make safe_charsets a pointer to
index 10b3b714d54b03d1b896e2d59aafe1a98e7be34b..143c58030c1602ab3a9362b04527525438561d4f 100644 (file)
@@ -7075,15 +7075,14 @@ DEFUN ("list-system-processes", Flist_system_processes, Slist_system_processes,
        doc: /* Return a list of numerical process IDs of all running processes.
 If this functionality is unsupported, return nil.
 
-See `system-process-attributes' for getting attributes of a process
-given its ID.  */)
+See `process-attributes' for getting attributes of a process given its ID.  */)
     ()
 {
   return list_system_processes ();
 }
 
-DEFUN ("system-process-attributes", Fsystem_process_attributes,
-       Ssystem_process_attributes, 1, 1, 0,
+DEFUN ("process-attributes", Fprocess_attributes,
+       Sprocess_attributes, 1, 1, 0,
        doc: /* Return attributes of the process given by its PID, a number.
 
 Value is an alist where each element is a cons cell of the form
@@ -7511,7 +7510,7 @@ The variable takes effect when `start-process' is called.  */);
   defsubr (&Sset_process_filter_multibyte);
   defsubr (&Sprocess_filter_multibyte_p);
   defsubr (&Slist_system_processes);
-  defsubr (&Ssystem_process_attributes);
+  defsubr (&Sprocess_attributes);
 }
 
 \f
@@ -7810,15 +7809,14 @@ DEFUN ("list-system-processes", Flist_system_processes, Slist_system_processes,
        doc: /* Return a list of numerical process IDs of all running processes.
 If this functionality is unsupported, return nil.
 
-See `system-process-attributes' for getting attributes of a process
-given its ID.  */)
+See `process-attributes' for getting attributes of a process given its ID.  */)
     ()
 {
   return list_system_processes ();
 }
 
-DEFUN ("system-process-attributes", Fsystem_process_attributes,
-       Ssystem_process_attributes, 1, 1, 0,
+DEFUN ("process-attributes", Fprocess_attributes,
+       Sprocess_attributes, 1, 1, 0,
        doc: /* Return attributes of the process given by its PID, a number.
 
 Value is an alist where each element is a cons cell of the form
@@ -7957,7 +7955,7 @@ syms_of_process ()
   defsubr (&Sget_buffer_process);
   defsubr (&Sprocess_inherit_coding_system_flag);
   defsubr (&Slist_system_processes);
-  defsubr (&Ssystem_process_attributes);
+  defsubr (&Sprocess_attributes);
 }
 
 \f