emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/ebuff-menu.el


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/ebuff-menu.el
Date: Fri, 04 Apr 2003 01:21:53 -0500

Index: emacs/lisp/ebuff-menu.el
diff -c emacs/lisp/ebuff-menu.el:1.30 emacs/lisp/ebuff-menu.el:1.31
*** emacs/lisp/ebuff-menu.el:1.30       Thu Mar  6 05:50:20 2003
--- emacs/lisp/ebuff-menu.el    Sun Mar  9 22:06:13 2003
***************
*** 269,283 ****
  
  (defvar electric-buffer-overlay nil)
  (defun electric-buffer-update-highlight ()
!   ;; Make sure we have an overlay to use.
!   (or electric-buffer-overlay
!       (progn
!         (make-local-variable 'electric-buffer-overlay)
!         (setq electric-buffer-overlay (make-overlay (point) (point)))))
!   (move-overlay electric-buffer-overlay
!                 (save-excursion (beginning-of-line) (point))
!                 (save-excursion (end-of-line) (point)))
!   (overlay-put electric-buffer-overlay 'face 'highlight))
  
  (provide 'ebuff-menu)
  
--- 269,284 ----
  
  (defvar electric-buffer-overlay nil)
  (defun electric-buffer-update-highlight ()
!   (when (eq major-mode 'Electric-buffer-menu-mode)
!     ;; Make sure we have an overlay to use.
!     (or electric-buffer-overlay
!       (progn
!         (make-local-variable 'electric-buffer-overlay)
!         (setq electric-buffer-overlay (make-overlay (point) (point)))))
!     (move-overlay electric-buffer-overlay
!                 (save-excursion (beginning-of-line) (point))
!                 (save-excursion (end-of-line) (point)))
!     (overlay-put electric-buffer-overlay 'face 'highlight)))
  
  (provide 'ebuff-menu)
  




reply via email to

[Prev in Thread] Current Thread [Next in Thread]