*** empty log message ***

diff --git a/lisp/mh-e/mh-e.el b/lisp/mh-e/mh-e.el
index 5186b1b2791fbade92b6cac2fa91bc918f26a598..67dd6d2d68af6fa5a2624d0fcef3c111ec489c05 100644 (file)
--- a/lisp/mh-e/mh-e.el
+++ b/lisp/mh-e/mh-e.el
@@ -1986,7 +1986,7 @@ you would use \"(mh-set-cmd-note 4)\"."
   :package-version '(MH-E . "7.0"))
 
 (defun mh-scan-format-file-check (symbol value)
-  "Check if desired setting is legal.
+  "Check if desired setting is valid.
 Throw an error if user tries to set `mh-scan-format-file' to
 anything but t when `mh-adaptive-cmd-note-flag' is on. Otherwise,
 set SYMBOL to VALUE."
@@ -2025,7 +2025,7 @@ Emacs start with 0)."
   :package-version '(MH-E . "6.0"))
 
 (defun mh-adaptive-cmd-note-flag-check (symbol value)
-  "Check if desired setting is legal.
+  "Check if desired setting is valid.
 Throw an error if user tries to turn on
 `mh-adaptive-cmd-note-flag' when `mh-scan-format-file' isn't t.
 Otherwise, set SYMBOL to VALUE."

diff --git a/lisp/mh-e/mh-xface.el b/lisp/mh-e/mh-xface.el
index 6b0dc863c1f4766b7fca97e01198e5ccdca1f33c..e160c6e5875ce1e106c1041352dc2c6b2d96ed87 100644 (file)
--- a/lisp/mh-e/mh-xface.el
+++ b/lisp/mh-e/mh-xface.el
@@ -360,8 +360,8 @@ This is only done if `mh-x-image-cache-directory' is nil."
   "Canonicalize URL.
 Replace the ?/ character with a ?! character and append .png.
 Also replaces special characters with `mh-url-hexify-string'
-since not all characters, such as :, are legal within Windows
-filenames. In addition, replaces * with %2a. See URL
+since not all characters, such as :, are valid within Windows
+filenames.  In addition, replaces * with %2a. See URL
 `http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/ifaces/iitemnamelimits/GetValidCharacters.asp'."
   (format "%s/%s.png" mh-x-image-cache-directory
           (mh-replace-regexp-in-string

diff --git a/lisp/progmodes/cc-awk.el b/lisp/progmodes/cc-awk.el
index b361585422a9f3ceae7351a18f12bf3cbe89ba65..de15d959cbd499f7325846b14751d36ba17432e4 100644 (file)
--- a/lisp/progmodes/cc-awk.el
+++ b/lisp/progmodes/cc-awk.el
@@ -213,7 +213,7 @@
   "\\([{}@` \t]\\|\\+\\+\\|--\\|\\\\.\\)")
 ;;   A "neutral" char(pair).  Doesn't change the "state" of a subsequent /.
 ;; This is space/tab, braces, an auto-increment/decrement operator or an
-;; escaped character.  Or one of the (illegal) characters @ or `.  But NOT an
+;; escaped character.  Or one of the (invalid) characters @ or `.  But NOT an
 ;; end of line (even if escaped).
 (defconst c-awk-neutrals*-re
   (concat "\\(" c-awk-neutral-re "\\)*"))

diff --git a/lisp/progmodes/cc-defs.el b/lisp/progmodes/cc-defs.el
index d7be903d357a94d0bbfc0c76f2daf0bd50cb989e..b509fdd7cc204456a21db095ad975ebb224a8b52 100644 (file)
--- a/lisp/progmodes/cc-defs.el
+++ b/lisp/progmodes/cc-defs.el
@@ -721,7 +721,7 @@ be after it."
                  ((bobp) (setq pos (point-min)))
                  ((not pos)
                   (let ((distance (skip-chars-backward "^{")))
-                    ;; unbalanced parenthesis, while illegal C code,
+                    ;; unbalanced parenthesis, while invalid C code,
                     ;; shouldn't cause an infloop!  See unbal.c
                     (when (zerop distance)
                       ;; Punt!

diff --git a/lisp/progmodes/cc-styles.el b/lisp/progmodes/cc-styles.el
index 02240400b1ea9a3ab09a27dab99d8819fe1b3613..72bc86b6cc1eb629ad9b46192822666795e2f4f5 100644 (file)
--- a/lisp/progmodes/cc-styles.el
+++ b/lisp/progmodes/cc-styles.el
@@ -423,7 +423,7 @@ STYLE using `c-set-style' if the optional SET-P flag is non-nil."
 
 (defun c-read-offset (langelem)
   ;; read new offset value for LANGELEM from minibuffer. return a
-  ;; legal value only
+  ;; valid value only
   (let* ((oldoff  (cdr-safe (or (assq langelem c-offsets-alist)
                                (assq langelem (get 'c-offsets-alist
                                                    'c-stylevar-fallback)))))
@@ -555,7 +555,7 @@ variables."
        "[ \t\f]*\\\\?$")
   (setq c-sentence-end-with-esc-eol
        (concat "\\(\\(" (c-default-value-sentence-end) "\\)"
-               ;; N.B.:  "$" would be illegal when not enclosed like "\\($\\)".
+               ;; N.B.:  "$" would be invalid when not enclosed like "\\($\\)".
                "\\|" "[.?!][]\"')}]* ?\\\\\\($\\)[ \t\n]*"
                "\\)")))
 

diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index bb45f74dea1f0dafa39bfb2bfc270365bdff749d..f2fbc1207fc465db4316d5ab0561d54c00926382 100644 (file)
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -1250,7 +1250,7 @@ versions of Emacs."
          ["Contract groups" cperl-contract-levels
           cperl-use-syntax-table-text-property]
          "----"
-         ["Find next interpolated" cperl-next-interpolated-REx 
+         ["Find next interpolated" cperl-next-interpolated-REx
           (next-single-property-change (point-min) 'REx-interpolated)]
          ["Find next interpolated (no //o)"
           cperl-next-interpolated-REx-0
@@ -2845,7 +2845,7 @@ Will not look before LIM."
                                    (skip-chars-backward " \t")
                                    (looking-at "[ \t]*[a-zA-Z_][a-zA-Z_0-9]*[ \t]*:")))
                             (get-text-property (point) 'first-format-line)))
-                  
+
                   ;; Look at previous line that's at column 0
                   ;; to determine whether we are in top-level decls
                   ;; or function's arg decls.  Set basic-indent accordingly.
@@ -3079,7 +3079,7 @@ and closing parentheses and brackets."
         ((eq 'toplevel (elt i 0)) ;; [toplevel start char-after state immed-after-block]
          (+ (save-excursion            ; To beg-of-defun, or end of last sexp
               (goto-char (elt i 1))    ; start = Good place to start parsing
-              (- (current-indentation) ; 
+              (- (current-indentation) ;
                  (if (elt i 4) cperl-indent-level 0))) ; immed-after-block
             (if (eq (elt i 2) ?{) cperl-continued-brace-offset 0) ; char-after
             ;; Look at previous line that's at column 0
@@ -3899,7 +3899,7 @@ the sections using `cperl-pod-head-face', `cperl-pod-face',
               ;;; XXX What to do: foo <<bar ???
               ;;; XXX Need to support print {a} <<B ???
                                       (forward-sexp -1)
-                                      (save-match-data 
+                                      (save-match-data
                                        ; $foo << b; $f .= <<B;
                                        ; ($f+1) << b; a($f) . <<B;
                                        ; foo 1, <<B; $x{a} <<b;
@@ -3931,7 +3931,7 @@ the sections using `cperl-pod-head-face', `cperl-pod-face',
                        qtag (regexp-quote tag))
                  (cond (cperl-pod-here-fontify
                         ;; Highlight the starting delimiter
-                        (cperl-postpone-fontification 
+                        (cperl-postpone-fontification
                          b1 e1 'face my-cperl-delimiters-face)
                         (cperl-put-do-not-fontify b1 e1 t)))
                  (forward-line)
@@ -4291,7 +4291,7 @@ the sections using `cperl-pod-head-face', `cperl-pod-face',
 ;;;m^a[\^b]c^ + m.a[^b]\.c.;
                        (save-excursion
                          (goto-char (1+ b))
-                         ;; First 
+                         ;; First
                          (cperl-look-at-leading-count is-x-REx e)
                          (setq hairy-RE
                                (concat
@@ -4452,7 +4452,7 @@ the sections using `cperl-pod-head-face', `cperl-pod-face',
                                 ;; This is not pretty: the 5.8.7 logic:
                                 ;; \0numx  -> octal (up to total 3 dig)
                                 ;; \DIGIT  -> backref unless \0
-                                ;; \DIGITs -> backref if legal
+                                ;; \DIGITs -> backref if valid
                                 ;;          otherwise up to 3 -> octal
                                 ;; Do not try to distinguish, we guess
                                 ((or (and (memq qtag (append "01234567" nil))
@@ -4460,7 +4460,7 @@ the sections using `cperl-pod-head-face', `cperl-pod-face',
                                            "\\=[01234567]?[01234567]?"
                                            (1- e) 'to-end))
                                      (and (memq qtag (append "89" nil))
-                                          (re-search-forward 
+                                          (re-search-forward
                                            "\\=[0123456789]*" (1- e) 'to-end))
                                      (and (eq qtag ?x)
                                           (re-search-forward
@@ -4498,7 +4498,7 @@ the sections using `cperl-pod-head-face', `cperl-pod-face',
                              ;; in m]]: m][\\\]\]] produces [\\]]
 ;;; POSIX?  [:word:] [:^word:] only inside []
 ;;;                                   "\\=\\(\\\\.\\|[^][\\\\]\\|\\[:\\^?\sw+:]\\|\\[[^:]\\)*]")
-                             (while 
+                             (while
                                  (and argument
                                       (re-search-forward
                                        (if (eq (char-after b) ?\] )
@@ -5815,7 +5815,7 @@ indentation and initial hashes.  Behaves usually outside of comment."
                                   ","
                                   cperl-maybe-white-and-comment-rex
                                   "\\([$@%*]\\([a-zA-Z0-9_:]+\\|[^a-zA-Z0-9_]\\)\\)")
-                       ;; Bug in font-lock: limit is used not only to limit 
+                       ;; Bug in font-lock: limit is used not only to limit
                        ;; searches, but to set the "extend window for
                        ;; facification" property.  Thus we need to minimize.
                        ,(if cperl-font-lock-multiline
@@ -6784,7 +6784,7 @@ construct.  DONE-TO and STATEPOS indicate changes to internal caches maintained
 by CPerl."
   (interactive "P")
   (or arg
-      (setq arg (if (eq cperl-syntaxify-by-font-lock 
+      (setq arg (if (eq cperl-syntaxify-by-font-lock
                        (if backtrace 'backtrace 'message)) 0 1)))
   (setq arg (if (> arg 0) (if backtrace 'backtrace 'message) t))
   (setq cperl-syntaxify-by-font-lock arg)
@@ -8245,7 +8245,7 @@ We suppose that the regexp is scanned already."
 (defun cperl-invert-if-unless-modifiers ()
   "Change `B if A;' into `if (A) {B}' etc if possible.
 \(Unfinished.)"
-  (interactive)                                ; 
+  (interactive)                                ;
   (let (A B pre-B post-B pre-if post-if pre-A post-A if-string
          (w-rex "\\<\\(if\\|unless\\|while\\|until\\|for\\|foreach\\)\\>"))
     (and (= (char-syntax (preceding-char)) ?w)