mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-28 00:01:33 -08:00
* progmodes/ebrowse.el (ebrowse-display-member-buffer): Avoid
using with-output-to-temp-buffer, which clobbers local vars.
This commit is contained in:
parent
b8fa0ffd0c
commit
ce4746a36a
2 changed files with 22 additions and 17 deletions
|
|
@ -1,3 +1,8 @@
|
|||
2006-07-11 Chong Yidong <cyd@stupidchicken.com>
|
||||
|
||||
* progmodes/ebrowse.el (ebrowse-display-member-buffer): Avoid
|
||||
using with-output-to-temp-buffer, which clobbers local vars.
|
||||
|
||||
2006-07-11 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* progmodes/compile.el (compilation-error-regexp-alist-alist):
|
||||
|
|
|
|||
|
|
@ -2734,11 +2734,11 @@ means the member buffer is standalone. CLASS is its class."
|
|||
;; is on if not specified as an argument.
|
||||
(unless class
|
||||
(setq class (ebrowse-tree-at-point)))
|
||||
(with-output-to-temp-buffer ebrowse-member-buffer-name
|
||||
(save-excursion
|
||||
(set-buffer standard-output)
|
||||
(save-selected-window
|
||||
(if temp-buffer
|
||||
(pop-to-buffer temp-buffer)
|
||||
(pop-to-buffer (get-buffer-create ebrowse-member-buffer-name))
|
||||
;; If new buffer, set the mode and initial values of locals
|
||||
(unless temp-buffer
|
||||
(ebrowse-member-mode))
|
||||
;; Set local variables
|
||||
(setq ebrowse--member-list (funcall list class)
|
||||
|
|
@ -2751,7 +2751,7 @@ means the member buffer is standalone. CLASS is its class."
|
|||
ebrowse--tree tree
|
||||
buffer-read-only t)
|
||||
(ebrowse-redisplay-member-buffer)
|
||||
(current-buffer)))))
|
||||
(current-buffer))))
|
||||
|
||||
|
||||
(defun ebrowse-member-display-p (member)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue