/[emacs]/emacs/lisp/diff-mode.el
ViewVC logotype

Diff of /emacs/lisp/diff-mode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.48 by monnier, Fri Sep 13 19:45:36 2002 UTC revision 1.49 by miles, Wed Sep 18 02:35:50 2002 UTC
# Line 1  Line 1 
1  ;;; diff-mode.el --- a mode for viewing/editing context diffs  ;;; diff-mode.el --- a mode for viewing/editing context diffs
2    
3  ;; Copyright (C) 1998, 1999, 2000, 2001  Free Software Foundation, Inc.  ;; Copyright (C) 1998, 1999, 2000, 2001, 2002  Free Software Foundation, Inc.
4    
5  ;; Author: Stefan Monnier <monnier@cs.yale.edu>  ;; Author: Stefan Monnier <monnier@cs.yale.edu>
6  ;; Keywords: convenience patch diff  ;; Keywords: convenience patch diff
# Line 889  a diff with \\[diff-reverse-direction]." Line 889  a diff with \\[diff-reverse-direction]."
889           (substring buffer-file-name 0 (match-beginning 0))))           (substring buffer-file-name 0 (match-beginning 0))))
890    ;; Be careful not to change compilation-last-buffer when we're just    ;; Be careful not to change compilation-last-buffer when we're just
891    ;; doing a C-x v = (for example).    ;; doing a C-x v = (for example).
892    (let ((compilation-last-buffer compilation-last-buffer))    (let ((compilation-last-buffer
893             (and (boundp 'compilation-last-buffer)
894                  compilation-last-buffer)))
895      (compilation-shell-minor-mode 1))      (compilation-shell-minor-mode 1))
896    
897    (when (and (> (point-max) (point-min)) diff-default-read-only)    (when (and (> (point-max) (point-min)) diff-default-read-only)

Legend:
Removed from v.1.48  
changed lines
  Added in v.1.49

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26