Add a scenario for mc/mark-all-symbols-like-this

2026-02-04 14:22:24 +00:00 · 2013-03-10 06:43:50 +01:00
parent a6e0ccb22f
commit 373dcbe002
2 changed files with 26 additions and 0 deletions
--- a/features/step-definitions/multiple-cursors-steps.el
+++ b/features/step-definitions/multiple-cursors-steps.el
@@ -95,3 +95,11 @@
          (assert search nil "The text '%s' was not found in the current buffer." text))
        (set-mark (point))
        (re-search-forward text)))
+
+(When "^I mark all \\(.+\\)$"
+      (lambda (rest)
+        (let ((func (intern (mapconcat 'identity
+                                       (cons  "mc/mark-all"
+                                              (split-string rest))
+                                       "-"))))
+          (call-interactively func))))