summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/km-magit.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/km-magit.el b/lisp/km-magit.el
index e7d80fe..45b2860 100644
--- a/lisp/km-magit.el
+++ b/lisp/km-magit.el
@@ -186,7 +186,8 @@ exist."
"branch"
(if choose-name
(magit-read-string-ns "Backup name" current)
- (let* ((version-re (format "\\`%s__v\\([[:digit:]]+\\)\\'" current))
+ (let* ((version-re (format "\\`%s__v\\([[:digit:]]+\\)\\'"
+ (regexp-quote current)))
(versions (delq nil
(mapcar
(lambda (s)