;ELC ;;; compiled by wmperry@monolith.perry.org on Thu May 12 12:59:33 1994 ;;; from file /u/wmperry/lisp/development/w3/w3/w3-hyperbole.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.")) (autoload 'w3-follow-link "w3" "\ Follow a WWW link." t) (autoload 'w3-fetch "w3" "\ Fetch the given URL." t) (autoload 'gopher-directory-choose "gopher" "\ Choose a gopher item." t) (byte-code " =! =yˊ`)#ΔΕ{!\")$ $ ;!\" !&!" [defib hwww:link-follow nil "When in a www buffer, follows a link with the primary button." major-mode w3-mode hact w3-follow-link gopher-directory-mode 0 search-forward-regexp "\\s-*\\([0-9]+\\)\\. " t string-to-int 1 dir gopher-directory-choose hwww:url "Attempts to follow a URL." w3-follow-url-at-point defact hwww:start url "Starts a www session, and tries to load up the given URL." error "(hwww:start): URL argument is not a string." string-match "none" w3 w3-fetch provide hwww] 9)