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:16:01 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/net/eudc-hotlist.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.

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

(require 'eudc)
(defvar eudc-hotlist-menu nil)
(defvar eudc-hotlist-list-beginning nil)
(defvar eudc-hotlist-mode-map (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\310#\210\302\311\312#\210\302\313\314#\210\302\315\316#\210)\207" [map make-sparse-keymap define-key "a" eudc-hotlist-add-server "d" eudc-hotlist-delete-server "s" eudc-hotlist-select-server "t" eudc-hotlist-transpose-servers "q" eudc-hotlist-quit-edit "x" kill-this-buffer] 4))
#@366 Major mode used to edit the hotlist of servers.

These are the special commands of this mode:
    a -- Add a new server to the list.
    d -- Delete the server at point from the list.
    s -- Select the server at point.
    t -- Transpose the server at point and the previous one
    q -- Commit the changes and quit.
    x -- Quit without committing the changes.
(defalias 'eudc-hotlist-mode #[nil "\304 \210\305\306\307\n!\210\310\311\312!\207" [major-mode mode-name eudc-hotlist-mode-map buffer-read-only kill-all-local-variables eudc-hotlist-mode "EUDC-Servers" use-local-map t run-mode-hooks eudc-hotlist-mode-hook] 2 (#$ . 1021) nil])
#@64 Edit the hotlist of directory servers in a specialized buffer.
(defalias 'eudc-edit-hotlist #[nil "\305\306\307\310\311!!\210\306\312 \210\313\314\"\210\315	\\\316	\317Z\320\"\321\322\323\324\325\326\327\323\261\n\210`\313\330\"\210\331 *\207" [gap proto-col buffer-read-only eudc-server-hotlist eudc-hotlist-list-beginning 10 nil switch-to-buffer get-buffer-create "*EUDC Servers*" erase-buffer mapc #[(entry) "@G	]\211\207" [entry proto-col] 2] 3 make-string 6 32 "              EUDC Servers\n" "              ============\n" "\n" "Server" "Protocol\n" "------" "--------\n" #[(entry) "@c\210	j\210\302A!\303\261\207" [entry proto-col symbol-name "\n"] 2] eudc-hotlist-mode] 10 (#$ . 1672) nil])
#@49 Add a new server to the list after current one.
(defalias 'eudc-hotlist-add-server #[nil "\305=\204\n�\306\307!\210\310\311!\312\313\314\315	\"\"\316m\204�\317y\210\fc\210\320j\210\321\261+\207" [major-mode eudc-known-protocols buffer-read-only protocol server eudc-hotlist-mode error "Not in a EUDC hotlist edit buffer" read-from-minibuffer "Server: " completing-read "Protocol: " mapcar #[(elt) "\301!B\207" [elt symbol-name] 2] nil 1 30 "\n"] 6 (#$ . 2391) nil])
#@43 Delete the server at point from the list.
(defalias 'eudc-hotlist-delete-server #[nil "\303=\204\n�\304\305!\210\306\212\307 \210`\nY\203\"�\310\311!\203\"�\312\313!\202%�\304\314!*\207" [major-mode buffer-read-only eudc-hotlist-list-beginning eudc-hotlist-mode error "Not in a EUDC hotlist edit buffer" nil beginning-of-line looking-at "^\$[-.a-zA-Z:0-9]+\$[ 	]+\$[a-zA-Z]+\$" kill-line 1 "No server on this line"] 2 (#$ . 2872) nil])
#@64 Quit the hotlist editing mode and save changes to the hotlist.
(defalias 'eudc-hotlist-quit-edit #[nil "\304=\204\n�\305\306!\210\307\nb\210\310\311!\203'�\312\313!\314\312\315!!B	B\313y\210\202�\310\316!\2041�\305\317!\210	\237\320 \210\321 \210\322 )\207" [major-mode hotlist eudc-hotlist-list-beginning eudc-server-hotlist eudc-hotlist-mode error "Not in a EUDC hotlist edit buffer" nil looking-at "^\$[-.a-zA-Z:0-9]+\$[ 	]+\$[a-zA-Z]+\$" match-string 1 intern 2 "^[ 	]*$" "Malformed entry in hotlist, discarding edits" eudc-install-menu eudc-save-options kill-this-buffer] 4 (#$ . 3320) nil])
#@51 Select the server at point as the current server.
(defalias 'eudc-hotlist-select-server #[nil "\304=\204\n�\305\306!\210\212\307 \210`	Y\203-�\310\311!\203-�\312\313\314!\315\313\316!!\"\210\317\320\n#\2020�\305\321!)\207" [major-mode eudc-hotlist-list-beginning eudc-server eudc-protocol eudc-hotlist-mode error "Not in a EUDC hotlist edit buffer" beginning-of-line looking-at "^\$[-.a-zA-Z:0-9]+\$[ 	]+\$[a-zA-Z]+\$" eudc-set-server match-string 1 intern 2 message "Current directory server is %s (%s)" "No server on this line"] 5 (#$ . 3932) nil])
#@65 Swap the order of the server with the previous one in the list.
(defalias 'eudc-hotlist-transpose-servers #[nil "\303=\204\n�\304\305!\210\306\212\307 \210`\nY\205+�\310\311!\205+�\312y\210\310\311!\205+�\313y\210\314\313!*\207" [major-mode buffer-read-only eudc-hotlist-list-beginning eudc-hotlist-mode error "Not in a EUDC hotlist edit buffer" nil beginning-of-line looking-at "^\$[-.a-zA-Z:0-9]+\$[ 	]+\$[a-zA-Z]+\$" -1 1 transpose-lines] 2 (#$ . 4495) nil])
(defconst eudc-hotlist-menu '("EUDC Hotlist Edit" ["---" nil nil] ["Add New Server" eudc-hotlist-add-server t] ["Delete Server" eudc-hotlist-delete-server t] ["Select Server" eudc-hotlist-select-server t] ["Transpose Servers" eudc-hotlist-transpose-servers t] ["Save and Quit" eudc-hotlist-quit-edit t] ["Exit without Saving" kill-this-buffer t]))
(byte-code "\302\303!\210\304\305\306	$\207" [eudc-hotlist-mode-map eudc-hotlist-menu (lambda (#1=#:def-tmp-var) (defvar eudc-hotlist-emacs-menu #1# #2="")) nil easy-menu-do-define eudc-hotlist-emacs-menu #2#] 5)