From b62607165b1c256c1c4cda2483576c5f04ecb624 Mon Sep 17 00:00:00 2001 From: kaoru Date: Fri, 23 Nov 2001 04:14:04 +0000 Subject: [PATCH] * wl-e21.el: Removed kludge for Emacs 21 prerelease versions. --- wl/ChangeLog | 4 ++++ wl/wl-e21.el | 12 ------------ 2 files changed, 4 insertions(+), 12 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index f97f8c8..9e57fe5 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,7 @@ +2001-11-23 TAKAHASHI Kaoru + + * wl-e21.el: Removed kludge for Emacs 21 prerelease versions. + 2001-11-23 Hiroya Murata * wl-vars.el (wl-message-buffer-prefetch-folder-type-list): New diff --git a/wl/wl-e21.el b/wl/wl-e21.el index 4a40e12..a27c93f 100644 --- a/wl/wl-e21.el +++ b/wl/wl-e21.el @@ -72,18 +72,6 @@ (defvar-maybe wl-folder-mode-map (make-sparse-keymap)) (defvar-maybe wl-draft-mode-map (make-sparse-keymap))) -;; For Emacs 21.0.104 or earlier -(defun-maybe make-mode-line-mouse-map (mouse function) "\ -Return a keymap with single entry for mouse key MOUSE on the mode line. -MOUSE is defined to run function FUNCTION with no args in the buffer -corresponding to the mode line clicked." - (let ((map (make-sparse-keymap))) - (define-key map (vector 'mode-line mouse) function) - map)) - -;; `display-images-p' has not been available prior to Emacs 21.0.105. -(defalias-maybe 'display-images-p 'display-graphic-p) - (add-hook 'wl-folder-mode-hook 'wl-setup-folder) (add-hook 'wl-folder-mode-hook 'wl-folder-init-icons) -- 1.7.10.4