mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00
Code Issues Releases Activity

(diff-mode): Don't evaluate `compilation-last-buffer' unless it's bound.

Browse Source
This commit is contained in:
Miles Bader 2002-09-18 02:36:10 +00:00
parent 8b3e840e95
commit bd3c9eb622
2 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2002-09-18 Miles Bader <miles@gnu.org>
* diff-mode.el (diff-mode): Don't evaluate `compilation-last-buffer'
unless it's bound.
2002-09-16 Markus Rost <rost@math.ohio-state.edu>
* ls-lisp.el (ls-lisp-format-time-list): Fix type and provide

6
lisp/diff-mode.el
View File

@ -1,6 +1,6 @@
;;; diff-mode.el --- a mode for viewing/editing context diffs
;; Copyright (C) 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
;; Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
;; Author: Stefan Monnier <monnier@cs.yale.edu>
;; Keywords: convenience patch diff
@ -889,7 +889,9 @@ a diff with \\[diff-reverse-direction]."
(substring buffer-file-name 0 (match-beginning 0))))
;; Be careful not to change compilation-last-buffer when we're just
;; doing a C-x v = (for example).
(let ((compilation-last-buffer compilation-last-buffer))
(let ((compilation-last-buffer
(and (boundp 'compilation-last-buffer)
compilation-last-buffer)))
(compilation-shell-minor-mode 1))
(when (and (> (point-max) (point-min)) diff-default-read-only)