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) ]