Source

view-process / view-process-xemacs.el

Diff from to

view-process-xemacs.el

 
 ;; Copyright (C) 1995, 1996 Heiko Muenkel
 
-;; AUthor: Heiko Muenkel
+;; Author: Heiko Muenkel
 ;; Keywords: processes
 
 ;; This file is part of XEmacs.
 
 ;;; Commentary:
 
-;;	This file contains lisp code, which works only in the XEmacs.
+;;	This file contains lisp code which works only in the XEmacs.
 
 ;; Installation: 
 
 ;;; variables
 
 (defvar View-process-itimer-name "view-process"
-  "Name of the view process itimer.")
+  "Name of the view-process itimer.")
 
 
 ;;; special keybindings
 	)
        ("Mark"
 	["Mark" View-process-mark-current-line nil]
-	["Mark Childs" View-process-mark-childs-in-current-line nil]
+	["Mark Children" View-process-mark-children-in-current-line nil]
 	["Remark Last Marks" View-process-reset-last-marks nil]
 	"----"
 	["Unmark" View-process-unmark-current-line nil]
        ["Field Filter..." 
 	View-process-filter-region-by-current-field 
 	(looking-at "[^ ]")]
-       ["Exlude Field Filter..." 
+       ["Exclude Field Filter..." 
 	(progn (setq current-prefix-arg '(-1))
 	       (call-interactively 
 		'View-process-filter-region-by-current-field))
 	)
        ("Mark"
 	["Mark" View-process-mark-current-line t]
-	["Mark Childs" View-process-mark-childs-in-current-line t]
+	["Mark Children" View-process-mark-children-in-current-line t]
 	["Remark Last Marks" View-process-reset-last-marks t]
 	"----"
 	["Unmark" View-process-unmark-current-line t]
        ["Reverse" View-process-reverse-output t]
        ["Field Filter..." 
 	View-process-filter-output-by-current-field (looking-at "[^ ]")]
-       ["Exlude Field Filter..." 
+       ["Exclude Field Filter..." 
 	(progn (setq current-prefix-arg '(-1))
 	       (call-interactively 
 		'View-process-filter-output-by-current-field))
 	)
        ("Mark"
 	["Mark" View-process-mark-current-line t]
-	["Mark Childs" View-process-mark-childs-in-current-line t]
+	["Mark Children" View-process-mark-children-in-current-line t]
 	["Remark Last Marks" View-process-reset-last-marks t]
 	"----"
 	["Unmark" View-process-unmark-current-line nil]
        ["Field Filter..." 
 	View-process-filter-output-by-current-field 
 	(looking-at "[^ ]")]
-       ["Exlude Field Filter..." 
+       ["Exclude Field Filter..." 
 	(progn (setq current-prefix-arg '(-1))
 	       (call-interactively 
 		'View-process-filter-output-by-current-field))
   (events-to-keys (this-command-keys)))
 
 (defun View-process-redraw ()
-  "Dummy function. It does nothing in the XEmacs."
+  "Dummy function. It does nothing in XEmacs."
   )