|
Select word/line/file
[Back]
Acts like the clicking mouse. For best results,
bind to Shift+Return.
if ($selection_start == -1)
$select_level = 1
if ($select_level == 1)
{
# select word
forward_word()
backward_word()
start=$cursor
end = search("\t| |$", $cursor, "regex")
}
if ($select_level == 2)
{
# select line
start = search("^", $cursor, "regex", "backward")
end = search("$", $cursor, "regex")
}
if ($select_level == 3)
{
# select file
start = 0
end = $text_length
}
if ($select_level == 4)
{
$select_level = 0
start = $cursor
end = $cursor
}
$select_level++
select(start,end)
You may want to add $select_level=0 to your .neditmacro
file.
[Back]
Released on Wed, 21 Nov 2001
by
C. Denat
|
|