MacRubyがObjective-C(or AppleScript)を乗っ取る
タイトルをつけた人の意図はそこにはないとは思うけど、 これは結構ありそう。
もちろん、Objective-Cのすべてを奪うことはありえないけど、 MacRubyレベルでObjective-Cとの融合が進むと カジュアルな利用はRubyで行うというのは予想以上に広まるかも。
また、AppleScriptの英語モドキよりもいっそRubyのような 「普通のプログラミング言語」を使った方がわかりやすい という人も多いだろう。
sudo cpan
install Mac::Growl
use Mac::Growl qw(RegisterNotifications);
RegisterNotifications(
$appname, # 登録するアプリケーション名
['alert', 'note', 'info'], # 登録したアプリケーションで使用する通知の種類。
# 自分が分かりやすい名前にしておくといいと思う
['note'] # デフォルトで使用する通知の種類。なんで複数の値を渡せるのかは知らない
);
use Mac::Growl qw(PostNotification);
PostNotification(
$appname, # 先ほど登録したアプリケーション名
'alert', # 通知の種類。登録してあるalert, note, infoのうちのどれかを渡す。
$title, # 表示されるタイトル。日本語を渡す場合は、
# Encode等を使用して、UTF-8にしてあげる必要があるようだ。
$description, # 表示される内容。
);
sudo port install subversion
mkdir svn_reps
cd svn_reps
svnadmin create bin
svn import ~/bin file:///Users/yoshi/svn_reps/bin
cd ~/bin
rm -rf *
svn co file:///Users/yoshi/svn_reps/bin
ソースを追ってみたら、lib/platform/COSXKeyState.cppの中でgetKeyMapでKCHRを取得する所でコケている様なので、356行のgetKeyMap(keyMap, g, kchr);をコメントアウトしてみたら、動いた。多分UCHRを取得してるから問題ないと思うんだけどな。とりあえず使ってみて、おかしい所があったら考えよう。
synergy で操作していると leave したときに画面のど真ん中にマウスカーソルがくるのが邪魔。0x0 に変更した。以下は 1.3.1 のコードに対する diff。lib/platform/COSScreen.cpp の COSXScreen::leave() で fakeMouseMove(m_xCenter, m_yCenter) しているところを fakeMouseMove(0, 0) に変えるだけの簡単なお仕事です。
use Debug::Smart -timestamp;
LOG("write a message");
DUMP("dump the data structures", $arg);
YAML("dump the data structures back into yaml", $arg)
