emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/vc-hgcmd 2137d67 58/87: Find proper filename across ren


From: Stefan Monnier
Subject: [elpa] externals/vc-hgcmd 2137d67 58/87: Find proper filename across renames on find revision
Date: Sat, 5 Jun 2021 16:11:46 -0400 (EDT)

branch: externals/vc-hgcmd
commit 2137d675189e7699108e10ef4eba1b246869ad06
Author: muffinmad <andreyk.mad@gmail.com>
Commit: muffinmad <andreyk.mad@gmail.com>

    Find proper filename across renames on find revision
---
 vc-hgcmd.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/vc-hgcmd.el b/vc-hgcmd.el
index e27d8e0..36d5f6c 100644
--- a/vc-hgcmd.el
+++ b/vc-hgcmd.el
@@ -5,7 +5,7 @@
 ;; Author: Andrii Kolomoiets <andreyk.mad@gmail.com>
 ;; Keywords: vc
 ;; URL: https://github.com/muffinmad/emacs-vc-hgcmd
-;; Package-Version: 1.6.2
+;; Package-Version: 1.6.3
 ;; Package-Requires: ((emacs "25.1"))
 
 ;; This file is NOT part of GNU Emacs.
@@ -969,7 +969,10 @@ Insert output to process buffer and check if amount of 
data is enought to parse
 (defun vc-hgcmd-find-revision (file rev buffer)
   "Put REV of FILE to BUFFER."
   (let ((file (vc-hgcmd--file-relative-name file)))
-    (apply #'vc-hgcmd-command-to-buffer buffer (if rev (list "cat" "-r" rev 
file) (list "cat" file)))))
+    (apply #'vc-hgcmd-command-to-buffer buffer
+           (if rev
+               (nconc (list "cat" "-r" rev) (vc-hgcmd--file-name-at-rev (list 
file) rev))
+             (list "cat" file)))))
 
 (defun vc-hgcmd-checkout (file &optional rev)
   "Retrieve revision REV of FILE."



reply via email to

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