diff options
| author | Eric M. Ludlam <zappo@gnu.org> | 1998-08-24 00:55:45 +0000 |
|---|---|---|
| committer | Eric M. Ludlam <zappo@gnu.org> | 1998-08-24 00:55:45 +0000 |
| commit | 1095518aeac7d91119aae01a6a34ccbea5c275fb (patch) | |
| tree | da484874748ca1b9eeffb7bbd9aab3b507e56c85 /lisp/speedbar.el | |
| parent | 2d0327e545cd3fc0f90643a2c3b7a043052d93c2 (diff) | |
| download | emacs-1095518aeac7d91119aae01a6a34ccbea5c275fb.tar.gz emacs-1095518aeac7d91119aae01a6a34ccbea5c275fb.tar.bz2 emacs-1095518aeac7d91119aae01a6a34ccbea5c275fb.zip | |
(speedbar-temp-buffer-show-function): For emacs don't call hook
with arguments.
Diffstat (limited to 'lisp/speedbar.el')
| -rw-r--r-- | lisp/speedbar.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/speedbar.el b/lisp/speedbar.el index 6b4a21e2a86..b4ad8cffd30 100644 --- a/lisp/speedbar.el +++ b/lisp/speedbar.el @@ -5,7 +5,7 @@ ;; Author: Eric M. Ludlam <zappo@gnu.org> ;; Version: 0.7.2a ;; Keywords: file, tags, tools -;; X-RCS: $Id: speedbar.el,v 1.10 1998/08/19 21:43:56 done Exp zappo $ +;; X-RCS: $Id: speedbar.el,v 1.11 1998/08/24 00:37:22 zappo Exp zappo $ ;; This file is part of GNU Emacs. @@ -1237,8 +1237,10 @@ redirected into a window on the attached frame." (if speedbar-attached-frame (select-frame speedbar-attached-frame)) (pop-to-buffer buffer nil) (other-window -1) - ;; Fix for using this hook: Bob Weiner - (cond ((fboundp 'run-hook-with-args) + ;; Fix for using this hook on some platforms: Bob Weiner + (cond ((not speedbar-xemacsp) + (run-hooks 'temp-buffer-show-hook)) + ((fboundp 'run-hook-with-args) (run-hook-with-args 'temp-buffer-show-hook buffer)) ((and (boundp 'temp-buffer-show-hook) (listp temp-buffer-show-hook)) |