* wl-e21.el: Removed kludge for Emacs 21 prerelease versions.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index f97f8c8..9e57fe5 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2001-11-23  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * wl-e21.el: Removed kludge for Emacs 21 prerelease versions.
+
 2001-11-23  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * 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 (file)
--- 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)