;ELC ;;; compiled by wmperry@monolith.perry.org on Thu May 12 13:00:56 1994 ;;; from file /u/wmperry/lisp/development/w3/w3/w3-next.el ;;; emacs version 19.10 Lucid (beta22). ;;; bytecomp version 2.24; 26-Apr-94. ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "This file was compiled for Emacs 19.")) (defvar w3-NeXT-mousemap (make-mousemap) "\ Mousemap for use on NeXT Emacs follows link, views the URL, quits") (byte-code "À ÂÃ#ˆÀ ÄÅ#ˆÀ ÆÇ#‡" [define-mouse w3-NeXT-mousemap (text left) w3-follow-mouse (text shift left) w3-view-url-at-mouse (text control left) w3-quit-from-mouse] 4) (fset 'w3-follow-mouse #[(window x y) "À \n #ˆÄ`!­‚Å ‡" [mouse-move-point window x y w3-zone-at w3-follow-link] 4 "\ Follow the link under the mouse cursor"]) (fset 'w3-view-url-at-mouse #[(window x y) "À \n #ˆÄ`!­‚Å ‡" [mouse-move-point window x y w3-zone-at w3-view-this-url] 4 "\ View the URL under the mouse cursor"]) (fset 'w3-quit-from-mouse #[(window x y) "À ‡" [w3-quit] 1 "\ Invoke w3-quit from mouse"]) (fset 'w3-mode-version-specifics #[nil "À !‡" [use-local-mousemap w3-NeXT-mousemap] 2 "\ NeXTEmacs specific w3-mode stuff"]) (provide 'w3-next)