# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1192952012 0
# Node ID 59ee4068f60bd7d905860df003edf058d6b13b4f
# Parent  0b3f2c1b117824627c889c82c4c204aaff22a340
* 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.

diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/ChangeLog
--- 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.
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/diff-mode.el
--- 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.
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/eshell/em-unix.el
--- 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)
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/eshell/esh-mode.el
--- 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))
 
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/obsolete/fast-lock.el
--- 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.
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/progmodes/cc-engine.el
--- 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
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/progmodes/dcl-mode.el
--- 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 *****************************************************
 
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/progmodes/gud.el
--- 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.
diff -r 0b3f2c1b1178 -r 59ee4068f60b lisp/w32-fns.el
--- a/lisp/w32-fns.el	Sun Oct 21 03:39:23 2007 +0000
+++ b/lisp/w32-fns.el	Sun Oct 21 07:33:32 2007 +0000
@@ -34,6 +34,7 @@
 ;; audio bell initialized.
 
 ;;; Code:
+(require 'w32-vars)
 
 (defvar explicit-shell-file-name)