changeset 100570:496de5bd1f6d

* proced.el (proced-grammar-alist): Doc fix. (proced-marker-char, proced-mark, proced-help-string, proced-mode-map) (proced-filter-parents, proced-sort-header, proced-update, proced-help) (proced-undo): Fix typos in docstrings.
author Juanma Barranquero <lekktu@gmail.com>
date Fri, 19 Dec 2008 21:53:25 +0000
parents be087e83835c
children ebc59d34e84a
files lisp/ChangeLog lisp/proced.el
diffstat 2 files changed, 20 insertions(+), 13 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Fri Dec 19 21:45:22 2008 +0000
+++ b/lisp/ChangeLog	Fri Dec 19 21:53:25 2008 +0000
@@ -1,3 +1,10 @@
+2008-12-19  Juanma Barranquero  <lekktu@gmail.com>
+
+	* proced.el (proced-grammar-alist): Doc fix.
+	(proced-marker-char, proced-mark, proced-help-string, proced-mode-map)
+	(proced-filter-parents, proced-sort-header, proced-update, proced-help)
+	(proced-undo): Fix typos in docstrings.
+
 2008-12-19  Glenn Morris  <rgm@gnu.org>
 
 	* emacs-lisp/authors.el (authors-aliases): Add some more aliases.
--- a/lisp/proced.el	Fri Dec 19 21:45:22 2008 +0000
+++ b/lisp/proced.el	Fri Dec 19 21:53:25 2008 +0000
@@ -148,9 +148,9 @@
 
 String NAME appears in the header line.
 
-FORMAT specifies the format for displaying the attribute values.
-It can be a string passed to `format'.  It can be a function called
-with one argument, the value of the attribute.  Nil means take as is.
+FORMAT specifies the format for displaying the attribute values.  It can
+be a string passed to `format'.  It can be a function called with one
+argument, the value of the attribute.  The value nil means take as is.
 
 If JUSTIFY is an integer, its modulus gives the width of the attribute
 values formatted with FORMAT.  If JUSTIFY is positive, NAME appears
@@ -359,7 +359,7 @@
 It is a list of lists (KEY PREDICATE REVERSE).")
 
 (defvar proced-marker-char ?*		; the answer is 42
-  "In proced, the current mark character.")
+  "In Proced, the current mark character.")
 
 ;; Faces and font-lock code taken from dired,
 ;; but face variables are deprecated for new code.
@@ -370,7 +370,7 @@
 
 (defface proced-mark
   '((t (:inherit font-lock-constant-face)))
-  "Face used for proced marks."
+  "Face used for Proced marks."
   :group 'proced-faces)
 
 (defface proced-marked
@@ -402,7 +402,7 @@
 
 (defconst proced-help-string
   "(n)ext, (p)revious, (m)ark, (u)nmark, (k)ill, (q)uit (type ? for more help)"
-  "Help string for proced.")
+  "Help string for Proced.")
 
 (defconst proced-header-help-echo
   "mouse-1, mouse-2: sort by attribute %s%s (%s)"
@@ -470,7 +470,7 @@
     (define-key km [remap undo] 'proced-undo)
     (define-key km [remap advertised-undo] 'proced-undo)
     km)
-  "Keymap for proced commands.")
+  "Keymap for Proced commands.")
 
 (easy-menu-define
   proced-menu proced-mode-map "Proced Menu"
@@ -913,7 +913,7 @@
 
 (defun proced-filter-parents (process-alist pid &optional omit-pid)
   "For PROCESS-ALIST return list of parent processes of PID.
-This list includes CPID unless OMIT-CPID is non-nil."
+This list includes PID unless OMIT-PID is non-nil."
   (let ((parent-list (unless omit-pid (list (assq pid process-alist)))))
     (while (setq pid (cdr (assq 'ppid (cdr (assq pid process-alist)))))
       (push (assq pid process-alist) parent-list))
@@ -1145,7 +1145,7 @@
 (defun proced-sort-header (event &optional arg)
   "Sort Proced listing based on an attribute.
 EVENT is a mouse event with starting position in the header line.
-It is converted in the corresponding attribute key.
+It is converted to the corresponding attribute key.
 This command updates the variable `proced-sort'.
 Prefix ARG controls sort order, see `proced-sort-interactive'."
   (interactive (list last-input-event (or last-prefix-arg 'no-arg)))
@@ -1380,7 +1380,7 @@
           (push (cons pid attributes) process-alist))))))
 
 (defun proced-update (&optional revert quiet)
-  "Update the `proced' process information.  Preserves point and marks.
+  "Update the Proced process information.  Preserves point and marks.
 With prefix REVERT non-nil, revert listing.
 Suppress status information if QUIET is nil."
   ;; This is the main function that generates and updates the process listing.
@@ -1670,7 +1670,7 @@
   (proced-log t signal))
 
 (defun proced-help ()
-  "Provide help for the `proced' user."
+  "Provide help for the Proced user."
   (interactive)
   (proced-why)
   (if (eq last-command 'proced-help)
@@ -1678,8 +1678,8 @@
     (message proced-help-string)))
 
 (defun proced-undo ()
-  "Undo in a proced buffer.
-This doesn't recover killed processes, it just undoes changes in the proced
+  "Undo in a Proced buffer.
+This doesn't recover killed processes, it just undoes changes in the Proced
 buffer.  You can use it to recover marks."
   (interactive)
   (let (buffer-read-only)