| Server IP : 217.160.0.212 / Your IP : 216.73.217.5 Web Server : Apache System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/url/ |
Upload File : |
;ELC ;;; Compiled ;;; in Emacs version 28.2 ;;; with all optimizations. (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 (#$ . 156)) (byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable url-irc-function funcall function #[0 "\300\207" [url-irc-rcirc] 1 ""] "Function to actually open an IRC connection.\nThe function should take the following arguments:\n HOST - the hostname of the IRC server to contact\n PORT - the port number of the IRC server to contact\n CHANNEL - What channel on the server to visit right away (can be nil)\n USER - What username to use\nPASSWORD - What password to use" :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] 8) #@40 (fn HOST PORT CHANNEL USER PASSWORD) (defalias 'url-irc-zenirc #[1285 "\203 \203 \203 \302\303$\202 \302\304#\305\257C\306 \210db\210\205: \307\261\210\310 *\207" [zenirc-server-alist zenirc-buffer-name format "%s@%s:%d" "%s:%d" nil zenirc "/join " zenirc-send-line] 11 (#$ . 928)]) #@40 (fn HOST PORT CHANNEL USER PASSWORD) (defalias 'url-irc-rcirc #[1285 "\205 \300P\301\302\211\205 C&\210\211\205' \303\304Q!\207" ["#" rcirc-connect nil switch-to-buffer "@"] 14 (#$ . 1246)]) #@40 (fn HOST PORT CHANNEL USER PASSWORD) (defalias 'url-irc-erc #[1285 "\300%\207" [erc-handle-irc-url] 11 (#$ . 1464)]) #@12 (fn URL) (defalias 'url-irc #[257 "\302!>\204 \303\304\305D\"\210\211\306H\302!>\204\" \303\304\305D\"\210\211\307H\206R \302!>\2047 \303\304\305D\"\210\211\310H\205R \311\302!>\204M \303\304\305D\"\210\310H\312\"\262\302!>\204c \303\304\305D\"\210\313H\302!>\204v \303\304\305D\"\210\314H\302!>\204\211 \303\304\305D\"\210\315H\302!>\204\235 \303\304\305D\"\210\316H\203\275 \211\317\302!>\204\266 \303\304\305\nD\"\210\316HQ\262\320\321\"\203\312 \211\310\322O\262\211G\323U\203\324 \322\262 %\210\322\207" [cl-struct-url-tags url-irc-function type-of signal wrong-type-argument url 4 5 1 url-scheme-get-property default-port 3 2 6 7 "#" string-match "^/" nil 0] 12 (#$ . 1594)]) (provide 'url-irc)