[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: patch for locate-file-completion?
From: |
Richard Stallman |
Subject: |
Re: patch for locate-file-completion? |
Date: |
Thu, 01 Apr 2004 12:34:20 -0500 |
It looks to me like right fix is this one.
Does this look right to you?
diff -c /home/rms/emacs/lisp/files.el.\~80\~ /home/rms/emacs/lisp/files.el
*** /home/rms/emacs/lisp/files.el.~80~ Mon Mar 29 23:58:25 2004
--- /home/rms/emacs/lisp/files.el Thu Apr 1 10:31:51 2004
***************
*** 616,621 ****
--- 616,623 ----
(suffix (concat (regexp-opt (cdr path-and-suffixes) t) "\\'"))
(string-dir (file-name-directory string)))
(dolist (dir (car path-and-suffixes))
+ (unless dir
+ (setq dir default-directory))
(if string-dir (setq dir (expand-file-name string-dir dir)))
(when (file-directory-p dir)
(dolist (file (file-name-all-completions
Diff finished. Thu Apr 1 10:32:37 2004
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Re: patch for locate-file-completion?,
Richard Stallman <=