[macemacsjp-cvs 388] CVS update: CarbonEmacsPackage/GPL/lisp

Back to archive index

Seiji Zenitani zenit****@users*****
2006年 7月 15日 (土) 21:16:16 JST


Index: CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el
diff -u CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.20 CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.21
--- CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.20	Tue Jun  6 01:39:09 2006
+++ CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el	Sat Jul 15 21:16:16 2006
@@ -12,7 +12,7 @@
 ;;; Code:
 
 (defconst carbon-emacs-package-version
-  "@@@@ Defined by the Makefile. @@@@"
+  "July, 2006; Carbon Emacs Package by S. Zenitani et al."
 ;;   (eval-when-compile (format-time-string "%B, %Y"))
   "Version information of Carbon Emacs Package.")
 (defconst carbon-emacs-package-app-path
@@ -160,10 +160,8 @@
      (mac-print-mode)
      :style toggle :selected mac-print-mode]
     ["OSX Native Input Method"
-     (if (equal default-input-method "MacOSX")
-         (mac-exit-inline-input-method)
-       (mac-setup-inline-input-method))
-     :style toggle :selected (equal default-input-method "MacOSX")]
+     (mac-input-method-mode)
+     :style toggle :selected mac-input-method-mode]
     ("Window Opacity"
      ["100 %" (carbon-emacs-package-set-alpha 1.0)
       :style toggle :selected (= carbon-emacs-package-alpha 1.0) ]


macemacsjp-cvs メーリングリストの案内
Back to archive index