Seiji Zenitani
zenit****@users*****
2006年 1月 12日 (木) 20:36:05 JST
Index: CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el diff -u CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.7 CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.8 --- CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el:1.7 Sun Jan 8 12:54:09 2006 +++ CarbonEmacsPackage/GPL/lisp/carbon-emacs-package.el Thu Jan 12 20:36:05 2006 @@ -131,9 +131,6 @@ ["Web Site (en)" (browse-url "http://homepage.mac.com/zenitani/emacs-e.html") t] ["--" nil nil] - ["Anti-Aliasing" - (setq mac-allow-anti-aliasing (not mac-allow-anti-aliasing)) - :style toggle :selected mac-allow-anti-aliasing] ["CJK Fixed-Width Fontset" (setq carbon-emacs-package-carbon-font-enabled (not carbon-emacs-package-carbon-font-enabled)) @@ -141,7 +138,7 @@ ["Mac-Style Key Bindings" (mac-key-mode) :style toggle :selected mac-key-mode] - ["Use Gs + Preview to Print (jp)" + ["Mac-Style Print Dialog" (mac-preview-mode) :style toggle :selected mac-preview-mode] ("Window Opacity" @@ -176,7 +173,6 @@ (dolist (elt '( - ("AntiAliasEnabled" . mac-allow-anti-aliasing) ("WindowAlpha" . carbon-emacs-package-alpha) ("MacKeyModeEnabled" . mac-key-mode) ("MacPreviewModeEnabled" . mac-preview-mode) Index: CarbonEmacsPackage/GPL/lisp/site-init.el diff -u CarbonEmacsPackage/GPL/lisp/site-init.el:1.11 CarbonEmacsPackage/GPL/lisp/site-init.el:1.12 --- CarbonEmacsPackage/GPL/lisp/site-init.el:1.11 Sun Jan 8 12:54:09 2006 +++ CarbonEmacsPackage/GPL/lisp/site-init.el Thu Jan 12 20:36:05 2006 @@ -47,9 +47,6 @@ (autoload 'htmlize-buffer "htmlize" "Convert buffer to html." t) (autoload 'htmlize-region "htmlize" "Convert region to html." t) -;; htmlize-view -(autoload 'htmlize-view-buffer "htmlize-view" nil t) - ;; imaxima (autoload 'imaxima "imaxima" "Image support for Maxima." t) @@ -62,8 +59,8 @@ ;; mac-key-mode (autoload 'mac-key-mode "mac-key-mode" "Mac-style key-binding mode." t) -;; mac-preview-mode -(autoload 'mac-preview-mode "mac-preview-mode" nil t) +;; mac-preview-mode (for backward compatibility) +(autoload 'mac-preview-mode "mac-print" nil t) ;; mew (autoload 'mew "mew" nil t)