CotEditorで表示中のテキストファイルを、GUI Scripting経由で縦書き表示するAppleScriptです。
CotEditorの途中のバージョンでメニュー構成が変更になったため、本Scriptは動かなくなりました。
とりあえず、メニュー変更に追従して書き換えを行なって使っていましたが、根本的な解決策を1024jpさんに教えてもらえたので(Xattributeの書き換え)、そちらをおすすめします。
AppleScript名:CotEditorの最前面で表示中のDocumentを縦書き表示に |
makeWinVertical() of me
on makeWinVertical() activate application "CotEditor" tell application "System Events" tell process "CotEditor" try click menu item "縦書きで表示" of menu 1 of menu bar item "フォーマット" of menu bar 1 end try end tell end tell end makeWinVertical |
More from my site
(Visited 51 times, 1 visits today)