(speedbar-default-directory-list): Made robust against deleted directories.

6b52944e · Richard M. Stallman · ad6ccf29 · 6b52944e · 6b52944e
Commit 6b52944e authored Mar 29, 2002 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 7 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +5 -0

lisp/speedbar.el lisp/speedbar.el +2 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2002-03-29  Eric M. Ludlam  <eric@siege-engine.com>
+
+	* speedbar.el (speedbar-default-directory-list): Made robust
+	against deleted directories.
+
 2002-03-28  Richard M. Stallman  <rms@gnu.org>

 	* dired.el (dired-toggle-marks): Renamed from dired-do-toggle.

--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -2389,8 +2389,8 @@ cell of the form ( 'DIRLIST .  'FILELIST )"
 		(if (looking-at "[0-9]+:[ ]*<")
 		    (progn
 		      (goto-char (match-end 0))
-		  (speedbar-do-function-pointer)))
-		(setq sf (cdr sf)))))
+		      (speedbar-do-function-pointer)))))
+	  (setq sf (cdr sf)))
 	)))

 (defun speedbar-sort-tag-hierarchy (lst)