branch: externals/vc-backup
commit 25844e039985641b8b9c09c24890209894a642f8
Author: Philip Kaludercic <phil...@posteo.net>
Commit: Philip Kaludercic <phil...@posteo.net>
Rename vc-backup--get-read to vc-backup--get-real
---
vc-backup.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/vc-backup.el b/vc-backup.el
index 00af0c4..b134f47 100644
--- a/vc-backup.el
+++ b/vc-backup.el
@@ -124,7 +124,7 @@
(defconst vc-backup--previous-tag "prev"
"Tag used for unversioned backup.")
-(defun vc-backup--get-read (file-or-backup)
+(defun vc-backup--get-real (file-or-backup)
"Return the actual file behind FILE-OR-BACKUP."
(if (backup-file-name-p file-or-backup)
(replace-regexp-in-string
@@ -142,7 +142,7 @@ function returns all backups for these files, in order of
their
recency."
(let (versions)
(dolist (file (if (listp file-or-list) file-or-list (list file-or-list)))
- (let ((filename (thread-last (vc-backup--get-read file)
+ (let ((filename (thread-last (vc-backup--get-real file)
expand-file-name
make-backup-file-name
file-name-sans-versions)))
