ld/multiple-cursors.el
1
0
Fork 0
mirror of https://github.com/magnars/multiple-cursors.el.git synced 2026-02-04 14:22:24 +00:00
Code Issues Packages Projects Releases Wiki Activity

mc version of mark-previous-like-this

Browse Source
This commit is contained in:
Magnar Sveen
2012-07-24 20:54:37 +02:00
parent 36b262c99e
commit 576bf90346
5 changed files with 95 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
features/step-definitions/multiple-cursors-steps.el
View File

@@ -82,3 +82,11 @@
(message "Can not go to character '%s' since it does not exist in the current buffer: %s"))
(assert search nil message word (espuds-buffer-contents))
(if (string-equal "front" pos) (backward-word)))))
(When "^I select the last \"\\(.+\\)\"$"
(lambda (text)
(goto-char (point-max))
(let ((search (re-search-backward text nil t)))
(assert search nil "The text '%s' was not found in the current buffer." text))
(set-mark (point))
(re-search-forward text)))