branch: elpa/magit
commit c5d1858f0769ace99560c13178d0fa47b9755638
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
Use same name for shorthand in test files as in libraries
---
test/magit-tests.el | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/test/magit-tests.el b/test/magit-tests.el
index d8e98ae4e11..022ddd8d691 100644
--- a/test/magit-tests.el
+++ b/test/magit-tests.el
@@ -271,13 +271,13 @@
(let* ((prompts '("^foo '\\(?99:.*\\)': ?$"))
(prompt (magit-process-match-prompt prompts "foo 'bar':")))
(should (equal prompt "foo 'bar': "))
- (should (equal (matched 99 "foo 'bar':") "bar"))))
+ (should (equal (match-str 99 "foo 'bar':") "bar"))))
(ert-deftest magit-process:password-prompt-regexps ()
(cl-flet ((m (prompt)
(and (magit-process-match-prompt
magit-process-password-prompt-regexps prompt)
- (or (matched 99 prompt) t))))
+ (or (match-str 99 prompt) t))))
;; History of `magit-process-password-prompt-regexps':
;; a36a801cc2 Initial noisy version.
;; 2a3bbc3c53 First cleanup.
@@ -538,6 +538,8 @@ Recent commits\n[[:xdigit:]]\\{7,\\} master dummy\\'"
;;; _
(provide 'magit-tests)
;; Local Variables:
-;; read-symbol-shorthands: (("matched" . "match-string-no-properties"))
+;; read-symbol-shorthands: (
+;; ("match-string" . "match-string")
+;; ("match-str" . "match-string-no-properties"))
;; End:
;;; magit-tests.el ends here
