Mercurial > emacs
changeset 27436:564f85cd6921
(vc-version-diff): Make sure file name is expanded.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Wed, 26 Jan 2000 10:31:13 +0000 |
parents | 4bd7fdf959dc |
children | 25b7a462bc4d |
files | lisp/vc.el |
diffstat | 1 files changed, 6 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc.el Tue Jan 25 21:44:04 2000 +0000 +++ b/lisp/vc.el Wed Jan 26 10:31:13 2000 +0000 @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de> -;; $Id: vc.el,v 1.257 1999/10/15 15:44:52 monnier Exp $ +;; $Id: vc.el,v 1.258 1999/12/02 14:21:08 gerd Exp $ ;; This file is part of GNU Emacs. @@ -1406,10 +1406,11 @@ If FILE is a directory, generate diffs between versions for all registered files in or below it." (interactive - (let ((file (read-file-name (if buffer-file-name - "File or dir to diff: (default visited file) " - "File or dir to diff: ") - default-directory buffer-file-name t)) + (let ((file (expand-file-name + (read-file-name (if buffer-file-name + "File or dir to diff: (default visited file) " + "File or dir to diff: ") + default-directory buffer-file-name t))) (rel1-default nil) (rel2-default nil)) ;; compute default versions based on the file state (cond