diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2018-12-09 15:06:04 -0500 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2018-12-09 15:13:46 -0500 |
| commit | 7fa947af86bdc65dd521c2e3e1444bc7e37cce32 (patch) | |
| tree | 7c34002f06e5026647dacfbd5a18a4e41a567d31 | |
| parent | 256ab0b2d857bd04dfd3d4574ab3390a4f4439d3 (diff) | |
| download | emacs.d-7fa947af86bdc65dd521c2e3e1444bc7e37cce32.tar.gz | |
km/magit-branch-backup-current: Quote branch name within regexp
| -rw-r--r-- | lisp/km-magit.el | 3 |
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) |