Mercurial > emacs
changeset 85503:59ee4068f60b
* progmodes/gud.el (gud-target-name): Move definition before use.
* progmodes/dcl-mode.el: Require imenu at compile time.
* progmodes/cc-engine.el (c-maybe-stale-found-type): Pacify
byte-compiler.
* obsolete/fast-lock.el: Use featurep test instead of
string-match.
* eshell/esh-mode.el (eshell-handle-ansi-color): Require
ansi-color at compile time too.
* eshell/em-unix.el (eshell/info): Require info at compile time
too.
* w32-fns.el: Require w32-vars.
* diff-mode.el (diff-refine-hunk): Require smerge-mode at compile
time too.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Sun, 21 Oct 2007 07:33:32 +0000 |
| parents | 0b3f2c1b1178 |
| children | 57182abd3d86 |
| files | lisp/ChangeLog lisp/diff-mode.el lisp/eshell/em-unix.el lisp/eshell/esh-mode.el lisp/obsolete/fast-lock.el lisp/progmodes/cc-engine.el lisp/progmodes/dcl-mode.el lisp/progmodes/gud.el lisp/w32-fns.el |
| diffstat | 9 files changed, 35 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/ChangeLog Sun Oct 21 07:33:32 2007 +0000 @@ -1,3 +1,26 @@ +2007-10-21 Dan Nicolaescu <dann@ics.uci.edu> + + * progmodes/gud.el (gud-target-name): Move definition before use. + + * progmodes/dcl-mode.el: Require imenu at compile time. + + * progmodes/cc-engine.el (c-maybe-stale-found-type): Pacify + byte-compiler. + + * obsolete/fast-lock.el: Use featurep test instead of + string-match. + + * eshell/esh-mode.el (eshell-handle-ansi-color): Require + ansi-color at compile time too. + + * eshell/em-unix.el (eshell/info): Require info at compile time + too. + + * w32-fns.el: Require w32-vars. + + * diff-mode.el (diff-refine-hunk): Require smerge-mode at compile + time too. + 2007-10-21 Stefan Monnier <monnier@iro.umontreal.ca> * double.el ([ignore]): Use ignore.
--- a/lisp/diff-mode.el Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/diff-mode.el Sun Oct 21 07:33:32 2007 +0000 @@ -1686,7 +1686,7 @@ (defun diff-refine-hunk () "Highlight changes of hunk at point at a finer granularity." (interactive) - (require 'smerge-mode) + (eval-and-compile (require 'smerge-mode)) (save-excursion (diff-beginning-of-hunk 'try-harder) (let* ((style (diff-hunk-style)) ;Skips the hunk header as well.
--- a/lisp/eshell/em-unix.el Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/eshell/em-unix.el Sun Oct 21 07:33:32 2007 +0000 @@ -175,7 +175,7 @@ 'info arg1' => OTHERWISE goes to top info window and then menu item arg1 'info arg1 arg2' => does action for arg1 (either visit-file or menu-item) and then menu item arg2 etc." - (require 'info) + (eval-and-compile (require 'info)) (let ((file (cond ((not (stringp (car args))) nil)
--- a/lisp/eshell/esh-mode.el Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/eshell/esh-mode.el Sun Oct 21 07:33:32 2007 +0000 @@ -1078,7 +1078,7 @@ (defun eshell-handle-ansi-color () "Handle ANSI color codes." - (require 'ansi-color) + (eval-and-compile (require 'ansi-color)) (ansi-color-apply-on-region eshell-last-output-start eshell-last-output-end))
--- a/lisp/obsolete/fast-lock.el Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/obsolete/fast-lock.el Sun Oct 21 07:33:32 2007 +0000 @@ -768,7 +768,7 @@ ;; Functions for XEmacs: -(when (save-match-data (string-match "XEmacs" (emacs-version))) +(when (featurep 'xemacs) ;; ;; It would be better to use XEmacs' `map-extents' over extents with a ;; `font-lock' property, but `face' properties are on different extents.
--- a/lisp/progmodes/cc-engine.el Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/progmodes/cc-engine.el Sun Oct 21 07:33:32 2007 +0000 @@ -4035,6 +4035,9 @@ c-found-types) (sort type-list 'string-lessp))) +;; Shut up the byte compiler. +(defvar c-maybe-stale-found-type) + (defun c-trim-found-types (beg end old-len) ;; An after change function which, in conjunction with the info in ;; c-maybe-stale-found-type (set in c-before-change), removes a type
--- a/lisp/progmodes/dcl-mode.el Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/progmodes/dcl-mode.el Sun Oct 21 07:33:32 2007 +0000 @@ -72,7 +72,7 @@ ;;; Code: (require 'tempo) - +(eval-when-compile (require 'imenu)) ;;; *** Customization *****************************************************
--- a/lisp/progmodes/gud.el Sun Oct 21 03:39:23 2007 +0000 +++ b/lisp/progmodes/gud.el Sun Oct 21 07:33:32 2007 +0000 @@ -106,6 +106,9 @@ (defvar gdb-ready nil) +(defvar gud-target-name "--unknown--" + "The apparent name of the program being debugged in a gud buffer.") + ;; Use existing Info buffer, if possible. (defun gud-goto-info () "Go to relevant Emacs info node." @@ -2451,9 +2454,6 @@ :group 'gud :type 'boolean) -(defvar gud-target-name "--unknown--" - "The apparent name of the program being debugged in a gud buffer.") - ;; Perform initializations common to all debuggers. ;; The first arg is the specified command line, ;; which starts with the program to debug.