[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r101560: Trivial bytecomp.el change.
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r101560: Trivial bytecomp.el change. |
Date: |
Thu, 23 Sep 2010 00:55:01 -0700 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 101560
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2010-09-23 00:55:01 -0700
message:
Trivial bytecomp.el change.
* lisp/emacs-lisp/bytecomp.el (byte-compile-file-form-defvar):
(byte-compile-defvar, byte-compile-cl-warn):
Start warnings with lower-case, like the majority.
modified:
lisp/ChangeLog
lisp/emacs-lisp/bytecomp.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2010-09-23 07:40:11 +0000
+++ b/lisp/ChangeLog 2010-09-23 07:55:01 +0000
@@ -1,5 +1,9 @@
2010-09-23 Glenn Morris <address@hidden>
+ * emacs-lisp/bytecomp.el (byte-compile-file-form-defvar):
+ (byte-compile-defvar, byte-compile-cl-warn):
+ Start warnings with lower-case, like the majority.
+
* files.el (auto-mode-alist): Add .xa, .xw, .xsw for ld-script-mode.
* files.el (auto-mode-alist): Prefer C-mode for .xs. (Bug#7071)
=== modified file 'lisp/emacs-lisp/bytecomp.el'
--- a/lisp/emacs-lisp/bytecomp.el 2010-09-17 14:31:06 +0000
+++ b/lisp/emacs-lisp/bytecomp.el 2010-09-23 07:55:01 +0000
@@ -1343,7 +1343,7 @@
(not (and (eq (get func 'byte-compile)
'cl-byte-compile-compiler-macro)
(string-match "\\`c[ad]+r\\'" (symbol-name func)))))
- (byte-compile-warn "Function `%s' from cl package called at runtime"
+ (byte-compile-warn "function `%s' from cl package called at runtime"
func)))
form)
@@ -2156,7 +2156,7 @@
(when (and (symbolp (nth 1 form))
(not (string-match "[-*/:$]" (symbol-name (nth 1 form))))
(byte-compile-warning-enabled-p 'lexical))
- (byte-compile-warn "Global/dynamic var `%s' lacks a prefix"
+ (byte-compile-warn "global/dynamic var `%s' lacks a prefix"
(nth 1 form)))
(push (nth 1 form) byte-compile-bound-variables)
(if (eq (car form) 'defconst)
@@ -3812,7 +3812,7 @@
(when (and (symbolp (nth 1 form))
(not (string-match "[-*/:$]" (symbol-name (nth 1 form))))
(byte-compile-warning-enabled-p 'lexical))
- (byte-compile-warn "Global/dynamic var `%s' lacks a prefix"
+ (byte-compile-warn "global/dynamic var `%s' lacks a prefix"
(nth 1 form)))
(let ((fun (nth 0 form))
(var (nth 1 form))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r101560: Trivial bytecomp.el change.,
Glenn Morris <=