diff-mode for vc-backend-diff

Saturday, 28 April 2001

In prog-modes/diff-mode.el

;; XEmacs change: no autoload for this for the transition period
(defadvice vc-backend-diff (around diff-mode-vc activate)
  ;; BEWARE!! when this is autoloaded, CL might not be available
  (condition-case ()
      (with-current-buffer "*vc-diff*" (setq buffer-read-only nil))
    (error nil))
  ad-do-it
  (condition-case ()
      (with-current-buffer "*vc-diff*"
	(if (memq major-mode '(fundamental-mode diff-mode)) (diff-mode)))
    (error nil)))

The above breaks when the default-major-mode is something other
than fundamental-mode.  As when:
  (setq default-major-mode 'text-mode)

Please consider changing this to:

   ...
   (if (or (eq major-mode default-major-mode) 
           (memq major-mode '(fundamental-mode diff-mode)))
       (diff-mode))

-jeff

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

2000

1999

1998