Seiji Zenitani
zenit****@users*****
2005年 11月 19日 (土) 14:56:37 JST
Index: CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el
diff -u CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.2 CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.3
--- CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.2 Thu Nov 10 22:25:03 2005
+++ CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el Sat Nov 19 14:56:37 2005
@@ -16,7 +16,7 @@
;; (eval-when-compile (format-time-string "%B, %Y"))
"Version information of Carbon Emacs Package.")
(defconst carbon-emacs-package-app-path
- (expand-file-name (concat (getenv "EMACSDATA") "/../../.."))
+ (expand-file-name (concat data-directory "../../.."))
"Path to the Carbon Emacs application.")
(defconst carbon-emacs-package-prefix
(concat carbon-emacs-package-app-path "/Contents/Resources")
@@ -134,13 +134,13 @@
["Anti-Aliasing"
(setq mac-allow-anti-aliasing (not mac-allow-anti-aliasing))
:style toggle :selected mac-allow-anti-aliasing]
- ["Mac-Style Key Bindings"
- (mac-key-mode)
- :style toggle :selected mac-key-mode]
- ["Use Fixed-Width Fontset"
+ ["CJK Fixed-Width Fontset"
(setq carbon-emacs-package-carbon-font-enabled
(not carbon-emacs-package-carbon-font-enabled))
:style toggle :selected carbon-emacs-package-carbon-font-enabled]
+ ["Mac-Style Key Bindings"
+ (mac-key-mode)
+ :style toggle :selected mac-key-mode]
["Use Gs + Preview to Print (jp)"
(mac-preview-mode)
:style toggle :selected mac-preview-mode]