From 76846b315db4183c4aeae6fd7be5223290700010 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 16 Feb 2001 09:55:39 +0000 Subject: (directory_files_internal): Set result list to nil before retrying. --- src/dired.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/dired.c') diff --git a/src/dired.c b/src/dired.c index f3f13534a87..ce2e5cb95b2 100644 --- a/src/dired.c +++ b/src/dired.c @@ -312,7 +312,10 @@ directory_files_internal (directory, full, match, nosort, attrs) specpdl_ptr = specpdl + count; if (retry_p) - goto retry; + { + list = Qnil; + goto retry; + } if (NILP (nosort)) list = Fsort (Fnreverse (list), -- cgit v1.2.1