Gecko [ goons4good.org ]

Name	Size	Permission	Date
ange-ftp.elc	119.46 KB	-rw-r--r--	2023-06-07 04:15
browse-url.elc	48.13 KB	-rw-r--r--	2023-06-07 04:15
dbus.elc	52.95 KB	-rw-r--r--	2023-06-07 04:15
dig.elc	6.32 KB	-rw-r--r--	2023-06-07 04:15
dns.elc	11.16 KB	-rw-r--r--	2023-06-07 04:16
eudc-bob.elc	8.76 KB	-rw-r--r--	2023-06-07 04:16
eudc-export.elc	5.84 KB	-rw-r--r--	2023-06-07 04:16
eudc-hotlist.elc	5.4 KB	-rw-r--r--	2023-06-07 04:16
eudc-vars.elc	13.99 KB	-rw-r--r--	2023-06-07 04:16
eudc.elc	31.94 KB	-rw-r--r--	2023-06-07 04:16
eudcb-bbdb.elc	5.29 KB	-rw-r--r--	2023-06-07 04:16
eudcb-ldap.elc	5.12 KB	-rw-r--r--	2023-06-07 04:16
eudcb-mab.elc	2.74 KB	-rw-r--r--	2023-06-07 04:16
eudcb-ph.elc	6.29 KB	-rw-r--r--	2023-06-07 04:16
gnutls.elc	7.86 KB	-rw-r--r--	2023-06-07 04:16
goto-addr.elc	9 KB	-rw-r--r--	2023-06-07 04:11
hmac-def.elc	2.01 KB	-rw-r--r--	2023-06-07 04:16
hmac-md5.elc	2.09 KB	-rw-r--r--	2023-06-07 04:16
imap.elc	101.96 KB	-rw-r--r--	2023-06-07 04:16
ldap.elc	15.05 KB	-rw-r--r--	2023-06-07 04:16
mairix.elc	24.06 KB	-rw-r--r--	2023-06-07 04:16
net-utils.elc	30.27 KB	-rw-r--r--	2023-06-07 04:16
netrc.elc	5.05 KB	-rw-r--r--	2023-06-07 04:16
network-stream.elc	10.07 KB	-rw-r--r--	2023-06-07 04:16
newst-backend.elc	65.62 KB	-rw-r--r--	2023-06-07 04:16
newst-plainview.elc	49.23 KB	-rw-r--r--	2023-06-07 04:16
newst-reader.elc	8.38 KB	-rw-r--r--	2023-06-07 04:16
newst-ticker.elc	7.51 KB	-rw-r--r--	2023-06-07 04:16
newst-treeview.elc	70.56 KB	-rw-r--r--	2023-06-07 04:16
newsticker.elc	830 B	-rw-r--r--	2023-06-07 04:16
ntlm.elc	11.63 KB	-rw-r--r--	2023-06-07 04:16
quickurl.elc	15.75 KB	-rw-r--r--	2023-06-07 04:16
rcirc.elc	98.21 KB	-rw-r--r--	2023-06-07 04:16
rcompile.elc	3.15 KB	-rw-r--r--	2023-06-07 04:16
rlogin.elc	10.83 KB	-rw-r--r--	2023-06-07 04:16
sasl-cram.elc	1.1 KB	-rw-r--r--	2023-06-07 04:16
sasl-digest.elc	3.47 KB	-rw-r--r--	2023-06-07 04:16
sasl-ntlm.elc	1.76 KB	-rw-r--r--	2023-06-07 04:16
sasl.elc	6.73 KB	-rw-r--r--	2023-06-07 04:16
secrets.elc	21.06 KB	-rw-r--r--	2023-06-07 04:16
snmp-mode.elc	14.64 KB	-rw-r--r--	2023-06-07 04:16
soap-client.elc	140.7 KB	-rw-r--r--	2023-06-07 04:16
soap-inspect.elc	14.6 KB	-rw-r--r--	2023-06-07 04:16
socks.elc	13.76 KB	-rw-r--r--	2023-06-07 04:16
telnet.elc	9.33 KB	-rw-r--r--	2023-06-07 04:16
tls.elc	7.8 KB	-rw-r--r--	2023-06-07 04:16
tramp-cache.elc	15.15 KB	-rw-r--r--	2023-06-07 04:16
tramp-cmds.elc	9.49 KB	-rw-r--r--	2023-06-07 04:16
tramp-compat.elc	16.15 KB	-rw-r--r--	2023-06-07 04:16
tramp-ftp.elc	5.49 KB	-rw-r--r--	2023-06-07 04:16
tramp-gvfs.elc	83.6 KB	-rw-r--r--	2023-06-07 04:16
tramp-gw.elc	13.8 KB	-rw-r--r--	2023-06-07 04:16
tramp-loaddefs.el	34.92 KB	-rw-r--r--	2023-06-07 03:59
tramp-sh.elc	251.02 KB	-rw-r--r--	2023-06-07 04:16
tramp-smb.elc	98.83 KB	-rw-r--r--	2023-06-07 04:16
tramp-uu.elc	1.95 KB	-rw-r--r--	2023-06-07 04:16
tramp.elc	134.83 KB	-rw-r--r--	2023-06-07 04:16
trampver.elc	1.11 KB	-rw-r--r--	2023-06-07 04:16
webjump.elc	13.71 KB	-rw-r--r--	2023-06-07 04:16
xesam.elc	24.97 KB	-rw-r--r--	2023-06-07 04:16
zeroconf.elc	18.31 KB	-rw-r--r--	2023-06-07 04:16

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:11:41 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/net/goto-addr.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(byte-code "\300\301!\210\302\303\304\"\210\305\306!\204�\300\307!\210\305\310!\204�\311\310\312\"\210\305\313!\204)�\311\313\314\"\210\305\315!\2044�\311\315\316\"\210\317\320\321\322\323\324\323\325&\210\326\327\330\331\332\333\323\320&\210\326\334\330\335\332\333\323\320&\210\326\336\337\340\332\341\323\320&\207" [require thingatpt autoload browse-url-url-at-point "browse-url" fboundp overlays-in overlay line-beginning-position defalias point-at-bol line-end-position point-at-eol match-string-no-properties match-string custom-declare-group goto-address nil "Click to browse URL or to send to e-mail address." :group mouse comm custom-declare-variable goto-address-fontify-p t "Non-nil means URLs and e-mail addresses in buffer are fontified.\nBut only if `goto-address-highlight-p' is also non-nil." :type boolean goto-address-highlight-p "Non-nil means URLs and e-mail addresses in buffer are highlighted." goto-address-fontify-maximum-size 30000 "Maximum size of file in which to fontify and/or highlight URLs.\nA value of t means there is no limit--fontify regardless of the size." (choice (integer :tag "Maximum size") (const :tag "No limit" t))] 8)
#@59 A regular expression probably matching an e-mail address.
(defvar goto-address-mail-regexp "[-a-zA-Z0-9=._+]+@\$[-a-zA-z0-9_]+\\.\$+[a-zA-Z0-9]+" (#$ . 1721))
#@47 A regular expression probably matching a URL.
(defvar goto-address-url-regexp (byte-code "\302\303\304\305\306\305\307\310!\"\"\311#\312	R\207" [thing-at-point-uri-schemes thing-at-point-url-path-regexp "\\<\$" mapconcat identity delete "mailto:" "data:" copy-sequence "\\|" "\$"] 9) (#$ . 1888))
#@67 Keymap to hold goto-addr's mouse key defs under highlighted URLs.
(defvar goto-address-highlight-keymap (byte-code "\301 \302\303\304#\210\302\305\304#\210)\207" [m make-sparse-keymap define-key [mouse-2] goto-address-at-point "
"] 4) (#$ . 2194))
(byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\305\306\307&\210\300\313\314\315\304\305\306\307&\210\300\316\317\320\304\305\306\307&\207" [custom-declare-variable goto-address-url-face 'link "Face to use for URLs." :type face :group goto-address goto-address-url-mouse-face 'highlight "Face to use for URLs when the mouse is on them." goto-address-mail-face 'italic "Face to use for e-mail addresses." goto-address-mail-mouse-face 'secondary-selection "Face to use for e-mail addresses when the mouse is on them."] 8)
#@60 Remove `goto-address' fontification from the given region.
(defalias 'goto-address-unfontify #[(start end) "\304	\"\305\211\205!�@\306\n\307\"\203�\310\n!\210A\211\204�\305*\207" [start end overlay --dolist-tail-- overlays-in nil overlay-get goto-address delete-overlay] 4 (#$ . 2999)])
#@144 Fontify the URLs and e-mail addresses in the current buffer.
This function implements `goto-address-highlight-p'
and `goto-address-fontify-p'.
(defalias 'goto-address-fontify #[(&optional start end) "\306\206�e	\206�d\"\210\212\307\206�eb\210\307=\204)�	\206\"�d`ZW\205\365�\310\f	\307#\203\213�\311\224\311\225\312\203G�\313\314 8\203\207�\315
\"\203[�\316\317#\210\316\320\307#\210\316\321#\210\316\322\307#\210\316\323\324#\210\316\325#\210\316\326\307#\210+\202)�\206\220�eb\210\310	\307#\205\365�\311\224\311\225\312\203\261�\313\314 8\203\361�\315
\"\203\305�\316\317 #\210\316\320\307#\210\316\321!#\210\316\322\307#\210\316\323\327#\210\316\325#\210\316\326\307#\210+\202\222�*\207" [start end inhibit-point-motion-hooks goto-address-fontify-maximum-size goto-address-url-regexp s goto-address-unfontify t re-search-forward 0 nil 8 syntax-ppss make-overlay overlay-put face evaporate mouse-face follow-link help-echo "mouse-2, C-c RET: follow URL" keymap goto-address "mouse-2, C-c RET: mail this address" e this-overlay goto-address-prog-mode goto-address-fontify-p goto-address-url-face goto-address-url-mouse-face goto-address-highlight-keymap goto-address-mail-regexp goto-address-mail-face goto-address-mail-mouse-face] 4 (#$ . 3302)])
#@56 Fontify URLs and e-mail addresses in the given region.
(defalias 'goto-address-fontify-region #[(start end) "\212b\210\304 	b\210\305 \306\n\"+\207" [start end end-line beg-line line-beginning-position line-end-position goto-address-fontify] 3 (#$ . 4632)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\207" [defalias goto-address-at-mouse goto-address-at-point nil make-obsolete "22.1"] 4)
#@215 Send to the e-mail address or load the URL at point.
Send mail to address at point.  See documentation for
`goto-address-find-address-at-point'.  If no address is found
there, then load the URL at or before point.
(defalias 'goto-address-at-point #[(&optional event) "\212\203�\304\305!!\210\212\306 )\211\203+�\212\307`\310\311\312 $b\210\313\n!)\204+�\314	!\202<�\315 \211\2038�\316!\202;�\317\320!)*\207" [event address goto-address-url-regexp url posn-set-point event-end goto-address-find-address-at-point previous-single-char-property-change goto-address nil line-beginning-position looking-at compose-mail browse-url-url-at-point browse-url error "No e-mail address or URL found"] 6 (#$ . 5040) (list last-input-event)])
#@165 Find e-mail address around or before point.
Then search backwards to beginning of line for the start of an e-mail
address.  If no e-mail address found, return nil.
(defalias 'goto-address-find-address-at-point #[nil "\301\302\303 \304#\210\305!\204�\306\307 \304#\205�\310\224b\205�\311\310!\207" [goto-address-mail-regexp re-search-backward "[^-_A-z0-9.@]" line-beginning-position lim looking-at re-search-forward line-end-position 0 match-string-no-properties] 4 (#$ . 5781)])
#@382 Sets up goto-address functionality in the current buffer.
Allows user to use mouse/keyboard command to click to go to a URL
or to send e-mail.
By default, goto-address binds `goto-address-at-point' to mouse-2 and C-c RET
only on URLs and e-mail addresses.

Also fontifies the buffer appropriately (see `goto-address-fontify-p' and
`goto-address-highlight-p' for more information).
(defalias 'goto-address #[nil "\205�\301 \207" [goto-address-highlight-p goto-address-fontify] 1 (#$ . 6272) nil])
#@103 Non-nil if Goto-Address mode is enabled.
Use the command `goto-address-mode' to change this variable.
(defvar goto-address-mode nil (#$ . 6777))
(make-variable-buffer-local 'goto-address-mode)
#@228 Minor mode to buttonize URLs and e-mail addresses in the current buffer.
With a prefix argument ARG, enable the mode if ARG is positive,
and disable it otherwise.  If called from Lisp, enable the mode
if ARG is omitted or nil.
(defalias 'goto-address-mode #[(&optional arg) "\303 	\304=\203�\n?\202�\305	!\306V\211\203�\307\310!\210\202,�\311\310!\210\214~\210\312ed\"\210)\313\314\n\2036�\315\2027�\316\"\210\317\320!\203X�\303 \203K�\303 \232\203X�\321\322\n\203U�\323\202V�\324\"\210)\325 \210\n\207" [#1=#:last-message arg goto-address-mode current-message toggle prefix-numeric-value 0 jit-lock-register goto-address-fontify-region jit-lock-unregister goto-address-unfontify run-hooks goto-address-mode-hook goto-address-mode-on-hook goto-address-mode-off-hook called-interactively-p any message "Goto-Address mode %sabled" "en" "dis" force-mode-line-update] 4 (#$ . 6977) (list (or current-prefix-arg 'toggle))])
(byte-code "\301\302\303\304\300!\205\n�\305\211%\207" [goto-address-mode-map add-minor-mode goto-address-mode "" boundp nil] 6)
#@113 Non-nil if Goto-Address-Prog mode is enabled.
Use the command `goto-address-prog-mode' to change this variable.
(defvar goto-address-prog-mode nil (#$ . 8039))
(make-variable-buffer-local 'goto-address-prog-mode)
#@62 Like `goto-address-mode', but only for comments and strings.
(defalias 'goto-address-prog-mode #[(&optional arg) "\303 	\304=\203�\n?\202�\305	!\306V\211\203�\307\310!\210\202,�\311\310!\210\214~\210\312ed\"\210)\313\314\n\2036�\315\2027�\316\"\210\317\320!\203X�\303 \203K�\303 \232\203X�\321\322\n\203U�\323\202V�\324\"\210)\325 \210\n\207" [#1=#:last-message arg goto-address-prog-mode current-message toggle prefix-numeric-value 0 jit-lock-register goto-address-fontify-region jit-lock-unregister goto-address-unfontify run-hooks goto-address-prog-mode-hook goto-address-prog-mode-on-hook goto-address-prog-mode-off-hook called-interactively-p any message "Goto-Address-Prog mode %sabled" "en" "dis" force-mode-line-update] 4 (#$ . 8258) (list (or current-prefix-arg 'toggle))])
(byte-code "\301\302\303\304\300!\205\n�\305\211%\210\306\307!\207" [goto-address-prog-mode-map add-minor-mode goto-address-prog-mode "" boundp nil provide goto-addr] 6)