From: Juanma Barranquero Date: Tue, 5 Feb 2008 13:00:43 +0000 (+0000) Subject: (erc-valid-nick-regexp): Replace `legal' with `valid'. X-Git-Tag: emacs-pretest-22.1.91~67 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4f9c00e2dc1e780ba79554fa8620cf875e196d19;p=emacs.git (erc-valid-nick-regexp): Replace `legal' with `valid'. --- diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index a631a4514a4..061bfc55444 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog @@ -1,3 +1,9 @@ +2008-02-05 Juanma Barranquero + + * erc.el (erc-valid-nick-regexp): + * erc-button.el (erc-button-syntax-table): + * erc-match.el (erc-match-syntax-table): Replace `legal' with `valid'. + 2007-11-15 Juanma Barranquero * erc.el (erc-open): diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el index 00d61a60ffd..649fc4a63df 100644 --- a/lisp/erc/erc.el +++ b/lisp/erc/erc.el @@ -2342,7 +2342,7 @@ If STRING is nil, the function does nothing." (setq list (cdr list)))))) (defvar erc-valid-nick-regexp "[]a-zA-Z^[;\\`_{}|][]^[;\\`_{}|a-zA-Z0-9-]*" - "Regexp which matches all legal characters in a IRC nickname.") + "Regexp which matches all valid characters in a IRC nickname.") (defun erc-is-valid-nick-p (nick) "Check if NICK is a valid IRC nickname." diff --git a/lisp/mail/mail-extr.el b/lisp/mail/mail-extr.el index c43b0d5a2b0..dd44507ee57 100644 --- a/lisp/mail/mail-extr.el +++ b/lisp/mail/mail-extr.el @@ -850,7 +850,7 @@ consing a string.)" (setq char ?\() ; HAVE I NO SHAME?? ) ;; record the position of various interesting chars, determine - ;; legality later. + ;; validity later. ((setq record-pos-symbol (cdr (assq char '((?< . <-pos) (?> . >-pos) (?@ . @-pos) @@ -862,9 +862,9 @@ consing a string.)" ((eq char ?.) (forward-char 1)) ((memq char '( - ;; comment terminator illegal + ;; comment terminator invalid ?\) - ;; domain literal terminator illegal + ;; domain literal terminator invalid ?\] ;; \ allowed only within quoted strings, ;; domain literals, and comments