(mouse-button-3): New variable.
;;; Code:
-(require 'emu)
(require 'mime)
(require 'semi-def)
(require 'calist)
(set-buffer (event-buffer event))
(popup-menu 'mime-view-xemacs-popup-menu))
(defvar mouse-button-2 'button2)
+ (defvar mouse-button-3 'button3)
)
(t
(defvar mime-view-popup-menu
(commandp func)
(funcall func))))
(defvar mouse-button-2 [mouse-2])
+ (defvar mouse-button-2 [mouse-3])
))
(defun mime-view-define-keymap (&optional default)