Seiji Zenitani
zenit****@users*****
2006年 1月 12日 (木) 20:36:05 JST
Index: CarbonEmacsPackage/GPL/mac/mac-key-mode.el diff -u CarbonEmacsPackage/GPL/mac/mac-key-mode.el:1.12 CarbonEmacsPackage/GPL/mac/mac-key-mode.el:1.13 --- CarbonEmacsPackage/GPL/mac/mac-key-mode.el:1.12 Tue Jan 3 23:24:42 2006 +++ CarbonEmacsPackage/GPL/mac/mac-key-mode.el Thu Jan 12 20:36:05 2006 @@ -3,7 +3,7 @@ ;; Copyright (C) 2004-2006 Seiji Zenitani <zenit****@mac*****> ;; Author: Seiji Zenitani <zenit****@mac*****> -;; Version: v20060103 +;; Version: v20060108 ;; Keywords: tools, mac ;; Created: 2004-12-27 ;; Compatibility: Mac OS X (Carbon Emacs) @@ -96,11 +96,6 @@ ;; "Do not use this variable.") (defvar mac-key-backup-pc-selection-mode nil "Do not use this variable.") -(defvar mac-key-use-htmlize-view - (if (locate-library "htmlize-view") t nil) - "Do not use this variable.") -(if mac-key-use-htmlize-view - (autoload 'htmlize-view-buffer "htmlize-view" nil t)) (defvar mac-key-smartactivate-command nil "Path to the activate command, provided by Kurita-san's SmartActivate package. @@ -163,11 +158,6 @@ '("Show In Finder" . mac-key-show-in-finder) 'mac-file-separator) (define-key-after menu-bar-file-menu [mac-open-terminal] '("Open Terminal" . mac-key-open-terminal) 'mac-show-in-finder) - (if mac-key-use-htmlize-view - (define-key-after menu-bar-file-menu [mac-htmlize-view-buffer] - '("Preview In Browser" . htmlize-view-buffer) - 'mac-show-in-finder) - ) (define-key-after menu-bar-edit-menu [mac-redo] '("Redo" . redo) 'undo) (define-key-after menu-bar-edit-menu [mac-edit-separator] @@ -182,9 +172,6 @@ (define-key global-map [menu-bar file mac-file-separator] nil) (define-key global-map [menu-bar file mac-show-in-finder] nil) - (if mac-key-use-htmlize-view - (define-key global-map [menu-bar file mac-htmlize-view-buffer] nil) - ) (define-key global-map [menu-bar file mac-open-terminal] nil) (define-key global-map [menu-bar edit mac-redo] nil) (define-key global-map [menu-bar edit mac-edit-separator] nil)