Page 1 of 1

Macro to Delete Unitl End of Sentence

Posted: 2007-10-19 08:25:46
by lawrencegoodman
Another macro request:
I need a macro that will deletete from the cursor to the end of the sentence (i.e. the period).

Any advice?


Posted: 2007-10-19 14:25:03
by martin
This should do what you're looking for:

Code: Select all

$deleteStart = Selection Location
$deleteLen = 0

# find the end of the current sentence
Find '($|\.(?![0-9])|[!?]+)[ \t]*', "E"
$selStart = Selection Location
$selLen = Selection Length
Begin Perl
$deleteLen = $selStart - $deleteStart;

# Select the sentence and delete it
Set Selection $deleteStart, $deleteLen
We also have some other sentence navigation macros in our macro repository.