diff options
author | Karoly Lorentey <lorentey@elte.hu> | 2005-06-21 15:42:45 +0000 |
---|---|---|
committer | Karoly Lorentey <lorentey@elte.hu> | 2005-06-21 15:42:45 +0000 |
commit | a3fbb8977ddcc3f913058d323af6034cb70561a9 (patch) | |
tree | d5b0488432b505d2a36ee2890f8727c8ac7506f5 /lisp/emacs-lisp | |
parent | ef85512e51f043d73788f00a2aed13cccde0682c (diff) | |
parent | 0ff13af938126dca16ec0e1e80e3ac38e177e5d3 (diff) | |
download | emacs-a3fbb8977ddcc3f913058d323af6034cb70561a9.tar.gz emacs-a3fbb8977ddcc3f913058d323af6034cb70561a9.tar.bz2 emacs-a3fbb8977ddcc3f913058d323af6034cb70561a9.zip |
Merged from miles@gnu.org--gnu-2005 (patch 423-434)
Patches applied:
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-423
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-424
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-425
Remove "-face" suffix from gnus faces
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-426
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-427
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-428
Remove "-face" suffix from MH-E faces
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-429
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-430
Remove "-face" suffix from cc-mode faces
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-431
Remove "-face" suffix from eshell faces
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-432
Remove "-face" suffix from ediff faces
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-433
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-434
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-351
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/derived.el | 2 | ||||
-rw-r--r-- | lisp/emacs-lisp/edebug.el | 2 | ||||
-rw-r--r-- | lisp/emacs-lisp/elint.el | 4 | ||||
-rw-r--r-- | lisp/emacs-lisp/regexp-opt.el | 2 | ||||
-rw-r--r-- | lisp/emacs-lisp/warnings.el | 23 |
5 files changed, 21 insertions, 12 deletions
diff --git a/lisp/emacs-lisp/derived.el b/lisp/emacs-lisp/derived.el index 943f052fc6d..006b6f2c588 100644 --- a/lisp/emacs-lisp/derived.el +++ b/lisp/emacs-lisp/derived.el @@ -320,7 +320,7 @@ which more-or-less shadow %s's corresponding tables." ;;;###autoload (defun derived-mode-init-mode-variables (mode) - "Initialise variables for a new MODE. + "Initialize variables for a new MODE. Right now, if they don't already exist, set up a blank keymap, an empty syntax table, and an empty abbrev table -- these will be merged the first time the mode is used." diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index 54325c87b6d..e9c767961cd 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -3323,7 +3323,7 @@ With prefix ARG, set temporary break at current point and go." (defun edebug-goto-here () - "Proceed to this stop point." + "Proceed to first stop-point at or after current position of point." (interactive) (edebug-go-mode t)) diff --git a/lisp/emacs-lisp/elint.el b/lisp/emacs-lisp/elint.el index d4967a7cd06..806fa8e6854 100644 --- a/lisp/emacs-lisp/elint.el +++ b/lisp/emacs-lisp/elint.el @@ -66,7 +66,7 @@ left-margin left-margin-width line-spacing local-abbrev-table local-write-file-hooks major-mode mark-active mark-ring mode-line-buffer-identification mode-line-format mode-line-modified mode-line-process mode-name - overwrite-mode + overwrite-mode point-before-scroll right-fringe-width right-margin-width scroll-bar-width scroll-down-aggressively scroll-up-aggressively selective-display selective-display-ellipses tab-width truncate-lines vc-mode vertical-scroll-bar) @@ -298,7 +298,7 @@ Return nil if there are no more forms, t otherwise." (not (eobp))) (defun elint-init-env (forms) - "Initialise the environment from FORMS." + "Initialize the environment from FORMS." (let ((env (elint-make-env)) form) (while forms diff --git a/lisp/emacs-lisp/regexp-opt.el b/lisp/emacs-lisp/regexp-opt.el index 3537a83c3c1..3e0c7c8ade4 100644 --- a/lisp/emacs-lisp/regexp-opt.el +++ b/lisp/emacs-lisp/regexp-opt.el @@ -116,7 +116,7 @@ by \\=\\< and \\>." (defun regexp-opt-depth (regexp) "Return the depth of REGEXP. This means the number of non-shy regexp grouping constructs -\(parenthesised expressions) in REGEXP." +\(parenthesized expressions) in REGEXP." (save-match-data ;; Hack to signal an error if REGEXP does not have balanced parentheses. (string-match regexp "") diff --git a/lisp/emacs-lisp/warnings.el b/lisp/emacs-lisp/warnings.el index 343eda970ce..e6c3447331e 100644 --- a/lisp/emacs-lisp/warnings.el +++ b/lisp/emacs-lisp/warnings.el @@ -76,16 +76,20 @@ If a warning's severity level is lower than this, the warning is logged in the warnings buffer, but the buffer is not immediately displayed. See also `warning-minimum-log-level'." :group 'warnings - :type '(choice (const :emergency) (const :error) (const :warning)) + :type '(choice (const :emergency) (const :error) + (const :warning) (const :debug)) :version "22.1") (defvaralias 'display-warning-minimum-level 'warning-minimum-level) (defcustom warning-minimum-log-level :warning "Minimum severity level for logging a warning. If a warning severity level is lower than this, -the warning is completely ignored." +the warning is completely ignored. +Value must be lower or equal than `warning-minimum-level', +because warnings not logged aren't displayed either." :group 'warnings - :type '(choice (const :emergency) (const :error) (const :warning)) + :type '(choice (const :emergency) (const :error) + (const :warning) (const :debug)) :version "22.1") (defvaralias 'log-warning-minimum-level 'warning-minimum-log-level) @@ -203,7 +207,9 @@ or a list of symbols whose first element is a custom group name. \(The rest of the symbols represent subcategories, for warning purposes only, and you can use whatever symbols you like.) -LEVEL should be either :warning, :error, or :emergency. +LEVEL should be either :debug, :warning, :error, or :emergency +\(but see `warning-minimum-level' and `warning-minimum-log-level'). + :emergency -- a problem that will seriously impair Emacs operation soon if you do not attend to it promptly. :error -- data or circumstances that are inherently wrong. @@ -223,7 +229,7 @@ See also `warning-series', `warning-prefix-function' and (if (assq level warning-level-aliases) (setq level (cdr (assq level warning-level-aliases)))) (or (< (warning-numeric-level level) - (warning-numeric-level warning-minimum-log-level)) + (warning-numeric-level warning-minimum-log-level)) (warning-suppress-p type warning-suppress-log-types) (let* ((typename (if (consp type) (car type) type)) (buffer (get-buffer-create (or buffer-name "*Warnings*"))) @@ -291,11 +297,14 @@ or a list of symbols whose first element is a custom group name. \(The rest of the symbols represent subcategories and can be whatever you like.) -LEVEL should be either :warning, :error, or :emergency. +LEVEL should be either :debug, :warning, :error, or :emergency +\(but see `warning-minimum-level' and `warning-minimum-log-level'). + :emergency -- a problem that will seriously impair Emacs operation soon if you do not attend to it promptly. :error -- invalid data or circumstances. -:warning -- suspicious data or circumstances." +:warning -- suspicious data or circumstances. +:debug -- info for debugging only." (display-warning type (apply 'format message args) level)) ;;;###autoload |