Content-Type: |
text/plain; charset="us-ascii" |
Date: |
Sat, 22 Apr 2017 01:57:21 +0900 |
Reply-To: |
|
Message-ID: |
|
Subject: |
|
From: |
|
Content-Transfer-Encoding: |
quoted-printable |
In-Reply-To: |
|
MIME-Version: |
1.0 (Mac OS X Mail 9.3 \(3124\)) |
Sender: |
|
Parts/Attachments: |
|
|
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
|
|
|