Gecko [ goons4good.org ]

Name	Size	Permission	Date
url-about.elc	2.65 KB	-rw-r--r--	2023-06-07 04:11
url-auth.elc	10.36 KB	-rw-r--r--	2023-06-07 04:11
url-cache.elc	6.93 KB	-rw-r--r--	2023-06-07 04:11
url-cid.elc	1.39 KB	-rw-r--r--	2023-06-07 04:11
url-cookie.elc	17.15 KB	-rw-r--r--	2023-06-07 04:11
url-dav.elc	21.09 KB	-rw-r--r--	2023-06-07 04:11
url-dired.elc	2.48 KB	-rw-r--r--	2023-06-07 04:11
url-domsuf.elc	1.67 KB	-rw-r--r--	2023-06-07 04:11
url-expand.elc	4.66 KB	-rw-r--r--	2023-06-07 04:11
url-file.elc	7.54 KB	-rw-r--r--	2023-06-07 04:11
url-ftp.elc	920 B	-rw-r--r--	2023-06-07 04:11
url-future.elc	8.23 KB	-rw-r--r--	2023-06-07 04:11
url-gw.elc	6.49 KB	-rw-r--r--	2023-06-07 04:11
url-handlers.elc	18.13 KB	-rw-r--r--	2023-06-07 04:11
url-history.elc	5.07 KB	-rw-r--r--	2023-06-07 04:11
url-http.elc	35.74 KB	-rw-r--r--	2023-06-07 04:11
url-imap.elc	2.17 KB	-rw-r--r--	2023-06-07 04:11
url-irc.elc	2.73 KB	-rw-r--r--	2023-06-07 04:11
url-ldap.elc	6.27 KB	-rw-r--r--	2023-06-07 04:11
url-mailto.elc	3.13 KB	-rw-r--r--	2023-06-07 04:11
url-methods.elc	4.23 KB	-rw-r--r--	2023-06-07 04:11
url-misc.elc	3.34 KB	-rw-r--r--	2023-06-07 04:11
url-news.elc	7.38 KB	-rw-r--r--	2023-06-07 04:11
url-nfs.elc	4.4 KB	-rw-r--r--	2023-06-07 04:11
url-ns.elc	2.3 KB	-rw-r--r--	2023-06-07 04:11
url-parse.elc	17.43 KB	-rw-r--r--	2023-06-07 04:11
url-privacy.elc	1.64 KB	-rw-r--r--	2023-06-07 04:11
url-proxy.elc	1.93 KB	-rw-r--r--	2023-06-07 04:11
url-queue.elc	14.1 KB	-rw-r--r--	2023-06-07 04:11
url-util.elc	16.82 KB	-rw-r--r--	2023-06-07 04:11
url-vars.elc	12.92 KB	-rw-r--r--	2023-06-07 04:11
url.elc	8.87 KB	-rw-r--r--	2023-06-07 04:11

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:11:29 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/url/url-irc.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\300\302!\207" [require url-vars url-parse] 2)
#@35 Default port for IRC connections.
(defconst url-irc-default-port 6667 (#$ . 622))
#@340 Function to actually open an IRC connection.
The function should take the following arguments:
    HOST - the hostname of the IRC server to contact
    PORT - the port number of the IRC server to contact
 CHANNEL - What channel on the server to visit right away (can be nil)
    USER - What username to use
PASSWORD - What password to use
(custom-declare-variable 'url-irc-function ''url-irc-rcirc '(#$ . 711) :type '(choice (const :tag "rcirc" :value url-irc-rcirc) (const :tag "ERC" :value url-irc-erc) (const :tag "ZEN IRC" :value url-irc-zenirc) (function :tag "Other")) :group 'url)
(defalias 'url-irc-zenirc #[(host port channel user password) "\203�	\203�\n\203�\306\307	\n$\202�\306\310	\n#	\n\311\257C\312 \210db\210
\2057�\313
\261\210\314 *\207" [user host port password zenirc-server-alist zenirc-buffer-name format "%s@%s:%d" "%s:%d" nil zenirc "/join " zenirc-send-line channel] 6])
(defalias 'url-irc-rcirc #[(host port channel user password) "\205�\305P\306\n\f\307\211	\205�	C&\210	\205!�\310	\311\nQ!)\207" [channel chan host port user "#" rcirc-connect nil switch-to-buffer "@"] 7])
(defalias 'url-irc-erc #[(host port channel user password) "\305	\n\f%\207" [host port channel user password erc-handle-irc-url] 6])
(defalias 'url-irc #[(url) "\306H	>\204�\307\310\311\300#\210\312H\211\306H	>\204\"�\307\310\313\300#\210\314H\206P�\306H	>\2046�\307\310\315\300#\210\316H\205P�\317\306H	>\204K�\307\310\315\300#\210\316H\320\")\306H	>\204`�\307\310\321\300#\210\322H\306H	>\204r�\307\310\323\300#\210\324H\306H	>\204\205�\307\310\325\300#\210\326H\306H	>\204\230�\307\310\327\300#\210\330H\203\265�\331\306H	>\204\257�\307\310\327\300#\210\330HQ\332\333\"\203\304�\316\334OG\306U\203\317�\334\n\f
%\210-\334\207" [url cl-struct-url-tags host urlobj port pass 0 error "%s accessing a non-%s" url-host 4 url-portspec 5 url-type 1 url-scheme-get-property default-port url-password 3 url-user 2 url-filename 6 url-target 7 "#" string-match "^/" nil user chan url-irc-function] 7])
(provide 'url-irc)