[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Possible bug in resolving "~" folder

From: Dhruva Krishnamurthy
Subject: Possible bug in resolving "~" folder
Date: Mon, 26 May 2003 10:49:06 +0530

  I am using Emacs 21.3.50 (CVS) on W2K (MSVC 6.0 build).
- Open a file (as in my case:"~/bin/cinclude.pl")
- Do a Save As (to "~/bin/cinclude1_0.pl")
- A call to (vc-mcvs-registered "~/bin/cinclude1_0.pl") is made
- In the "while" loop, a call to (file-name-directory "~") [progressively
going to top dir]
- The above call returns "nil". IMHO, it should have called
"expand-file-name" internally inside "file-name-directory" or should
handle 'nil' and return 'nil' instead of throwing error.

A fix which solved my problem was: in loaddefs.el @23991, call
(defun vc-mcvs-registered (file)
  (let ((dir file))
    (while (and (stringp dir)
                (not (equal dir (setq dir (file-name-directory 
(expand-file-name dir)))))) ;; Modified here
      (setq dir (if (file-directory-p
                     (expand-file-name "MCVS/CVS" dir))
                    t (directory-file-name dir))))
    (if (eq dir t)
          (load "vc-mcvs")
          (vc-mcvs-registered file)))))
Dhruva Krishnamurthy
Home: http://www32.brinkster.com/schemer/

reply via email to

[Prev in Thread] Current Thread [Next in Thread]