From: Richard M. Stallman Date: Fri, 29 Apr 1994 06:25:49 +0000 (+0000) Subject: (vc-mode-line): Fix previous change. X-Git-Tag: emacs-19.34~8661 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1d888548752f9c2b09ba31f411c70d3dea1fba17;p=emacs.git (vc-mode-line): Fix previous change. --- diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index 48e3ea6424d..0704cdb6aaf 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el @@ -155,8 +155,8 @@ visiting FILE." (not (string-equal (user-login-name) (vc-locking-user file))) (setq buffer-read-only t)) (and (null vc-type) - (file-symlink-p buffer-file-name) - (let ((link-type (vc-backend-deduce (file-symlink-p buffer-file-name)))) + (file-symlink-p file) + (let ((link-type (vc-backend-deduce (file-symlink-p file)))) (if link-type (message "Warning: symbolic link to %s-controlled source file" link-type))))