diff options
| author | Dan Nicolaescu | 2007-10-27 20:27:34 +0000 |
|---|---|---|
| committer | Dan Nicolaescu | 2007-10-27 20:27:34 +0000 |
| commit | f83fb05aa10c8066350e678ae066ca77cd1717be (patch) | |
| tree | 083c5ed6b5e2e6dd24546e5b8e02f93f4a87581e | |
| parent | ca54ae34f4acd01b8b9a5ee2928f7c8c44841a2f (diff) | |
| download | emacs-f83fb05aa10c8066350e678ae066ca77cd1717be.tar.gz emacs-f83fb05aa10c8066350e678ae066ca77cd1717be.zip | |
Reorder conditions to avoid warnings.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/progmodes/cc-defs.el | 8 |
2 files changed, 8 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d91d92609e4..063d303b80a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2007-10-27 Dan Nicolaescu <dann@ics.uci.edu> | ||
| 2 | |||
| 3 | * progmodes/cc-defs.el: Reorder conditions to avoid warnings. | ||
| 4 | |||
| 1 | 2007-10-27 Juanma Barranquero <lekktu@gmail.com> | 5 | 2007-10-27 Juanma Barranquero <lekktu@gmail.com> |
| 2 | 6 | ||
| 3 | * desktop.el (desktop-load-locked-desktop, desktop-base-lock-name) | 7 | * desktop.el (desktop-load-locked-desktop, desktop-base-lock-name) |
diff --git a/lisp/progmodes/cc-defs.el b/lisp/progmodes/cc-defs.el index e932456fa91..f6adfb8cef9 100644 --- a/lisp/progmodes/cc-defs.el +++ b/lisp/progmodes/cc-defs.el | |||
| @@ -73,9 +73,9 @@ | |||
| 73 | 73 | ||
| 74 | ; (eval-after-load "font-lock" ; 2006-07-09. font-lock is now preloaded | 74 | ; (eval-after-load "font-lock" ; 2006-07-09. font-lock is now preloaded |
| 75 | ; ' | 75 | ; ' |
| 76 | (if (and (not (featurep 'cc-fix)) ; only load the file once. | 76 | (if (and (featurep 'xemacs) ; There is now (2005/12) code in GNU Emacs CVS |
| 77 | (featurep 'xemacs) ; There is now (2005/12) code in GNU Emacs CVS | ||
| 78 | ; to make the call to f-l-c-k throw an error. | 77 | ; to make the call to f-l-c-k throw an error. |
| 78 | (not (featurep 'cc-fix)) ; only load the file once. | ||
| 79 | (let (font-lock-keywords) | 79 | (let (font-lock-keywords) |
| 80 | (font-lock-compile-keywords '("\\<\\>")) | 80 | (font-lock-compile-keywords '("\\<\\>")) |
| 81 | font-lock-keywords)) ; did the previous call foul this up? | 81 | font-lock-keywords)) ; did the previous call foul this up? |
| @@ -84,8 +84,8 @@ | |||
| 84 | ;; The above takes care of the delayed loading, but this is necessary | 84 | ;; The above takes care of the delayed loading, but this is necessary |
| 85 | ;; to ensure correct byte compilation. | 85 | ;; to ensure correct byte compilation. |
| 86 | (eval-when-compile | 86 | (eval-when-compile |
| 87 | (if (and (not (featurep 'cc-fix)) | 87 | (if (and (featurep 'xemacs) |
| 88 | (featurep 'xemacs) | 88 | (not (featurep 'cc-fix)) |
| 89 | (progn | 89 | (progn |
| 90 | (require 'font-lock) | 90 | (require 'font-lock) |
| 91 | (let (font-lock-keywords) | 91 | (let (font-lock-keywords) |