[Emacs-diffs] /srv/bzr/emacs/trunk r110241: * bytecomp.el (byte-compile-cl-file-p): Only "cl.el" counts as cl these days.

[Glenn Morris]

------------------------------------------------------------
revno: 110241
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Fri 2012-09-28 19:30:52 -0400
message:
  * bytecomp.el (byte-compile-cl-file-p): Only "cl.el" counts as cl these days.
  
  Remove no longer appropriate file-local suppression of CL warnings in
  lisp/emacs-lisp/cl-*.el files.
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/bytecomp.el
  lisp/emacs-lisp/cl-extra.el
  lisp/emacs-lisp/cl-lib.el
  lisp/emacs-lisp/cl-macs.el
  lisp/emacs-lisp/cl-seq.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-09-28 16:38:07 +0000
+++ b/lisp/ChangeLog    2012-09-28 23:30:52 +0000
@@ -1,3 +1,8 @@
+2012-09-28  Glenn Morris  <address@hidden>
+
+       * emacs-lisp/bytecomp.el (byte-compile-cl-file-p):
+       Only "cl.el" counts as cl these days.
+
 2012-09-28  Juri Linkov  <address@hidden>
 
        Display archive errors in the echo area instead of inserting

=== modified file 'lisp/emacs-lisp/bytecomp.el'
--- a/lisp/emacs-lisp/bytecomp.el       2012-09-20 13:46:36 +0000
+++ b/lisp/emacs-lisp/bytecomp.el       2012-09-28 23:30:52 +0000
@@ -846,7 +846,7 @@
 (defun byte-compile-cl-file-p (file)
   "Return non-nil if FILE is one of the CL files."
   (and (stringp file)
-       (string-match "^cl\\>" (file-name-nondirectory file))))
+       (string-match "^cl\\.el" (file-name-nondirectory file))))
 
 (defun byte-compile-eval (form)
   "Eval FORM and mark the functions defined therein.

=== modified file 'lisp/emacs-lisp/cl-extra.el'
--- a/lisp/emacs-lisp/cl-extra.el       2012-07-11 23:13:41 +0000
+++ b/lisp/emacs-lisp/cl-extra.el       2012-09-28 23:30:52 +0000
@@ -689,7 +689,6 @@
 
 ;; Local variables:
 ;; byte-compile-dynamic: t
-;; byte-compile-warnings: (not cl-functions)
 ;; generated-autoload-file: "cl-loaddefs.el"
 ;; End:
 

=== modified file 'lisp/emacs-lisp/cl-lib.el'
--- a/lisp/emacs-lisp/cl-lib.el 2012-09-17 05:41:04 +0000
+++ b/lisp/emacs-lisp/cl-lib.el 2012-09-28 23:30:52 +0000
@@ -745,7 +745,6 @@
 
 ;; Local variables:
 ;; byte-compile-dynamic: t
-;; byte-compile-warnings: (not cl-functions)
 ;; End:
 
 ;;; cl-lib.el ends here

=== modified file 'lisp/emacs-lisp/cl-macs.el'
--- a/lisp/emacs-lisp/cl-macs.el        2012-09-10 01:16:13 +0000
+++ b/lisp/emacs-lisp/cl-macs.el        2012-09-28 23:30:52 +0000
@@ -2686,7 +2686,6 @@
 
 ;; Local variables:
 ;; byte-compile-dynamic: t
-;; byte-compile-warnings: (not cl-functions)
 ;; generated-autoload-file: "cl-loaddefs.el"
 ;; End:
 

=== modified file 'lisp/emacs-lisp/cl-seq.el'
--- a/lisp/emacs-lisp/cl-seq.el 2012-06-11 15:52:50 +0000
+++ b/lisp/emacs-lisp/cl-seq.el 2012-09-28 23:30:52 +0000
@@ -1010,7 +1010,6 @@
 
 ;; Local variables:
 ;; byte-compile-dynamic: t
-;; byte-compile-warnings: (not cl-functions)
 ;; generated-autoload-file: "cl-loaddefs.el"
 ;; End: