diff options
author | Eric M. Ludlam <[email protected]> | 1998-08-24 01:16:09 +0000 |
---|---|---|
committer | Eric M. Ludlam <[email protected]> | 1998-08-24 01:16:09 +0000 |
commit | 469a3717cc97dfea5d3239137f838cfdde06489c (patch) | |
tree | 1fcb3730955a2dfa29f80bd535bee4dd3182af26 /lisp/speedbar.el | |
parent | 1095518aeac7d91119aae01a6a34ccbea5c275fb (diff) |
(speedbar-stealthy-updates): Do all updates w/ the the buffer writable.
Diffstat (limited to 'lisp/speedbar.el')
-rw-r--r-- | lisp/speedbar.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/speedbar.el b/lisp/speedbar.el index b4ad8cffd3..4c11902d0b 100644 --- a/lisp/speedbar.el +++ b/lisp/speedbar.el @@ -5,7 +5,7 @@ ;; Author: Eric M. Ludlam <[email protected]> ;; Version: 0.7.2a ;; Keywords: file, tags, tools -;; X-RCS: $Id: speedbar.el,v 1.11 1998/08/24 00:37:22 zappo Exp zappo $ +;; X-RCS: $Id: speedbar.el,v 1.12 1998/08/24 00:55:45 zappo Exp zappo $ ;; This file is part of GNU Emacs. @@ -2615,9 +2615,10 @@ interrupted by the user." (let ((l (speedbar-initial-stealthy-functions)) (speedbar-stealthy-update-recurse t)) (unwind-protect - (while (and l (funcall (car l))) - ;(sit-for 0) - (setq l (cdr l))) + (speedbar-with-writable + (while (and l (funcall (car l))) + ;;(sit-for 0) + (setq l (cdr l)))) ;;(message "Exit with %S" (car l)) )))) |