cocoa-emacs-inline-atok23.patch

*** lisp/term/ns-win.el.orig	2011-05-07 08:46:32.000000000 +0900
--- lisp/term/ns-win.el	2011-05-07 08:47:02.000000000 +0900
***************
*** 1530,1535 ****
--- 1530,1555 ----
       (title . "半英")
       (cursor-color)
       (cursor-type))
+     ("com.justsystems.inputmethod.atok23.Roman"
+      (title . "A")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok23.Japanese"
+      (title . "あ")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok23.Japanese.Katakana"
+      (title . "ア")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok23.Japanese.FullWidthRoman"
+      (title . "英")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok23.Japanese.HalfWidthEiji"
+      (title . "半英")
+      (cursor-color)
+      (cursor-type))
      )
    "Alist of Mac script code vs parameters for input method on MacOSX.")
  

cocoa-emacs-inline-atok24.patch

*** lisp/term/ns-win.el.orig	2011-05-07 08:46:32.000000000 +0900
--- lisp/term/ns-win.el	2011-05-07 08:47:02.000000000 +0900
***************
*** 1530,1535 ****
--- 1530,1555 ----
       (title . "半英")
       (cursor-color)
       (cursor-type))
+     ("com.justsystems.inputmethod.atok24.Roman"
+      (title . "A")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok24.Japanese"
+      (title . "あ")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok24.Japanese.Katakana"
+      (title . "ア")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok24.Japanese.FullWidthRoman"
+      (title . "英")
+      (cursor-color)
+      (cursor-type))
+     ("com.justsystems.inputmethod.atok24.Japanese.HalfWidthEiji"
+      (title . "半英")
+      (cursor-color)
+      (cursor-type))
      )
    "Alist of Mac script code vs parameters for input method on MacOSX.")
  

emacs-rb.patch

diff --git a/Library/Formula/emacs.rb b/Library/Formula/emacs.rb
index b310270..666e693 100644
--- a/Library/Formula/emacs.rb
+++ b/Library/Formula/emacs.rb
@@ -24,16 +24,21 @@ class Emacs < Formula
   end
 
   def patches
-    p = []
+    p = {:p0 => [], :p1 => []}
 
     # Fix for building with Xcode 4; harmless on Xcode 3.x.
     unless ARGV.build_head?
-      p << "http://repo.or.cz/w/emacs.git/commitdiff_plain/c8bba48c5889c4773c62a10f7c3d4383881f11c1"
+      p[:p1] << "http://repo.or.cz/w/emacs.git/commitdiff_plain/c8bba48c5889c4773c62a10f7c3d4383881f11c1"
     end
 
     if ARGV.include? "--cocoa"
       # Fullscreen patch, works against 23.3 and HEAD.
-      p << "https://raw.github.com/gist/1012927"
+      p[:p1] << "https://raw.github.com/gist/1012927"
+      # inline-patch by MacEmacs JP
+      # see: http://sourceforge.jp/projects/macemacsjp/
+      p[:p0] << "http://sourceforge.jp/projects/macemacsjp/svn/view/inline_patch/trunk/emacs-inline.patch?revision=573&root=macemacsjp"
+      # supporting ATOK24 for inline-patch
+      p[:p0] << "https://raw.github.com/gist/960080/55657368c5a7cc6eaad255f1d3e5c42ab8083ed0/cocoa-emacs-inline-atok24.patch"
     end
 
     return p