Commit 8100b5a8 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(vc-bzr-revision-completion-table): Choose the right `:'.

parent dbf46ba6
...@@ -662,7 +662,7 @@ stream. Standard error output is discarded." ...@@ -662,7 +662,7 @@ stream. Standard error output is discarded."
) )
((eq (car-safe action) 'boundaries) ((eq (car-safe action) 'boundaries)
(list* 'boundaries (list* 'boundaries
(if (string-match ":" string) (1+ (match-beginning 0))) (string-match "[^:]*\\'" string)
(string-match ":" (cdr action)))) (string-match ":" (cdr action))))
(t (t
;; Could use completion-table-with-terminator, except that it ;; Could use completion-table-with-terminator, except that it
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment