Fix MSDOS build broken by 2010-09-10T16:44:35Z!larsi@gnus.org, support MSDOS build...

[gnu-emacs] / lisp / sb-image.el

diff --git a/lisp/sb-image.el b/lisp/sb-image.el
index 5a2b42f4a471c4e85f1317ccca517e74f7744162..808cf6b072c067e46506747cf5265923af979613 100644 (file)
--- a/lisp/sb-image.el
+++ b/lisp/sb-image.el
@@ -1,7 +1,7 @@
 ;;; sb-image --- Image management for speedbar
 
 ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2005,
-;;   2006, 2007, 2008 Free Software Foundation, Inc.
+;;   2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: file, tags, tools
@@ -37,7 +37,7 @@
 
 ;;; Code:
 (defcustom speedbar-use-images ezimage-use-images
-  "*Non-nil if speedbar should display icons."
+  "Non-nil if speedbar should display icons."
   :group 'speedbar
   :version "21.1"
   :type 'boolean)
@@ -85,8 +85,7 @@ If we have an image associated with it, use that image."
 See `speedbar-expand-image-button-alist' for details."
   (interactive)
   (with-output-to-temp-buffer "*Speedbar Images*"
-    (save-excursion
-      (set-buffer "*Speedbar Images*")
+    (with-current-buffer "*Speedbar Images*"
       (goto-char (point-max))
       (insert "Speedbar image cache.\n\n")
       (let ((start (point)) (end nil))