From 6b52944ef5d348053cb148de14e8211839347dbf Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 29 Mar 2002 12:46:02 +0000 Subject: [PATCH] (speedbar-default-directory-list): Made robust against deleted directories. --- lisp/ChangeLog | 5 +++++ lisp/speedbar.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 34b4c7fc48a..bb6131aedda 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-03-29 Eric M. Ludlam + + * speedbar.el (speedbar-default-directory-list): Made robust + against deleted directories. + 2002-03-28 Richard M. Stallman * dired.el (dired-toggle-marks): Renamed from dired-do-toggle. diff --git a/lisp/speedbar.el b/lisp/speedbar.el index 5a01717a19b..6f63ba2469b 100644 --- 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) -- 2.39.2