From 72fcf38256aa4e21301e536c90bda148023d9ab5 Mon Sep 17 00:00:00 2001 From: Sam Steingold Date: Wed, 18 Feb 2009 15:37:40 +0000 Subject: [PATCH] Require comint at top level to fix the last patch. --- lisp/ChangeLog | 5 +++++ lisp/progmodes/compile.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e8221abc9df..c64ad36bbee 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-02-18 Sam Steingold + + * progmodes/compile.el: Require comint at top level to fix the + last patch. + 2009-02-18 Martin Rudalics * cus-edit.el (custom-group-value-create): Don't throw an error diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 47b21286c97..00bd33bc39c 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -72,6 +72,7 @@ (eval-when-compile (require 'cl)) (require 'tool-bar) +(require 'comint) (defvar font-lock-extra-managed-props) (defvar font-lock-keywords) @@ -1155,7 +1156,7 @@ Returns the compilation buffer created." (or mode (setq mode 'compilation-mode)) (let* ((name-of-mode (if (eq mode t) - (prog1 "compilation" (require 'comint)) + "compilation" (replace-regexp-in-string "-mode$" "" (symbol-name mode)))) (thisdir default-directory) outwin outbuf) -- 2.39.5