NISUS Archives

April 2017

NISUS@LISTSERV.DARTMOUTH.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Reply To:
Date:
Sat, 22 Apr 2017 01:57:21 +0900
Content-Type:
text/plain
Parts/Attachments:
text/plain (27 lines)
Hello Nobumi,

> On 2017/04/21, at 23:44, Nobumi Iyanaga <[log in to unmask]> wrote:
> 
> if $sels.firstValue.length  # if there is a visible selection (not just a caret)...
> 	foreach $sel in $sels
> 		$text.transliterateInRange($sel.range, $map)
> 	end
> else
> 	$newDoc = $doc.copy
> 	$text = $newDoc.text
> 	$sels = $doc.text.findAll '\p{Han}+', 'E', '-am'
> 	foreach $sel in $sels
> 		$text.transliterateInRange($sel.range, $map)
> 	end
> end
> 
> -- This works well for the main text part of a file, but not for notes. I would like to make it to work for notes included. I cannot figure out how to do this. Could anyone of you please give me such a macro?
> 

Your findAll command limits the find scope to the main body text only. If you remove '-am', your macro should work for other text objects, including notes, too.

Those options are explained under "The where argument" in "Nisus Macro Reference".


Kino

ATOM RSS1 RSS2