Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
erc-autoaway.elc	11.75 KB	-rw-r--r--
erc-backend.elc	157.65 KB	-rw-r--r--
erc-button.elc	17.08 KB	-rw-r--r--
erc-capab.elc	7.76 KB	-rw-r--r--
erc-compat.elc	4.18 KB	-rw-r--r--
erc-dcc.elc	41.46 KB	-rw-r--r--
erc-desktop-notifications.elc	5.73 KB	-rw-r--r--
erc-ezbounce.elc	4.92 KB	-rw-r--r--
erc-fill.elc	6.81 KB	-rw-r--r--
erc-goodies.elc	35.06 KB	-rw-r--r--
erc-ibuffer.elc	6.6 KB	-rw-r--r--
erc-identd.elc	4.92 KB	-rw-r--r--
erc-imenu.elc	2.39 KB	-rw-r--r--
erc-join.elc	8.85 KB	-rw-r--r--
erc-lang.elc	4.48 KB	-rw-r--r--
erc-list.elc	10.22 KB	-rw-r--r--
erc-loaddefs.el	11.96 KB	-rw-r--r--
erc-log.elc	14.75 KB	-rw-r--r--
erc-match.elc	19.19 KB	-rw-r--r--
erc-menu.elc	6.36 KB	-rw-r--r--
erc-netsplit.elc	7.88 KB	-rw-r--r--
erc-networks.elc	40.34 KB	-rw-r--r--
erc-notify.elc	9.72 KB	-rw-r--r--
erc-page.elc	5.09 KB	-rw-r--r--
erc-pcomplete.elc	11.69 KB	-rw-r--r--
erc-replace.elc	4 KB	-rw-r--r--
erc-ring.elc	5.62 KB	-rw-r--r--
erc-services.elc	18.55 KB	-rw-r--r--
erc-sound.elc	5.75 KB	-rw-r--r--
erc-speedbar.elc	9.55 KB	-rw-r--r--
erc-spelling.elc	4.85 KB	-rw-r--r--
erc-stamp.elc	15.18 KB	-rw-r--r--
erc-track.elc	32.41 KB	-rw-r--r--
erc-truncate.elc	4.31 KB	-rw-r--r--
erc-xdcc.elc	5.82 KB	-rw-r--r--
erc.elc	244.31 KB	-rw-r--r--

Code Editor : erc-ibuffer.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.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!\210\300\303!\210\304\305\306\307\310\303%\210\311\312\313\314\310\305\315\316&\210\311\317\320\321\310\305\315\316&\210\311\322\323\324\310\305\315\316&\210\311\325\326\327\310\305\315\316&\207" [require ibuffer ibuf-ext erc custom-declare-group erc-ibuffer nil "The Ibuffer group for ERC." :group custom-declare-variable erc-ibuffer-keyword-char 107 "Char used to indicate a channel which had keyword traffic lately (hidden)." :type character erc-ibuffer-pal-char 112 "Char used to indicate a channel which had pal traffic lately (hidden)." erc-ibuffer-fool-char 102 "Char used to indicate a channel which had fool traffic lately (hidden)." erc-ibuffer-dangerous-host-char 100 "Char used to indicate a channel which had dangerous-host traffic lately\n(hidden)."] 8)
#@66 Toggle current view to buffers which are related to ERC servers.
(defalias 'ibuffer-filter-by-erc-server #[(qualifier) "\303B\304\n!\204�\305\306	\"\202�\305\307	\"\210\310\311\312\"*\207" [qualifier #1=#:ibuffer-qualifier-str #2=#:ibuffer-filter erc-server ibuffer-push-filter message "Filter by erc servers already applied:  %s" "Filter by erc servers added:  %s" ibuffer-update nil t] 3 (#$ . 1214) (list (let ((regexp (read-from-minibuffer "Limit by server (regexp) (RET for all): "))) (if (string= regexp "") ".*" regexp)))])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist erc-server "erc servers" #[(buf qualifier) "\3051�rq\210	\306=\205�\307\n\206�\f\")0\207\210\310 \210\311\207" [buf major-mode qualifier erc-server-announced-name erc-session-server (error) erc-mode string-match ibuffer-pop-filter nil] 3]] 3)
(defalias 'ibuffer-make-column-erc-modified #[(buffer mark) "\210r	q\210\306\302!\203j�\n\203j�p\236\211\203e�\fG\307V\203^�\fA@\310=\203-�\311
!\202f�\fA@\312=\203<�\311!\202f�\fA@\313=\203K�\311!\202f�\fA@\314=\203Z�\311!\202f�\315\202f�\311!\202f�\316)\202k�\316)\207" [mark buffer erc-track-mode erc-modified-channels-alist entry erc-ibuffer-pal-char boundp 1 pal string fool keyword dangerous-host "$" " " erc-ibuffer-fool-char erc-ibuffer-keyword-char erc-ibuffer-dangerous-host-char ibuffer-modified-char] 3])
(put 'ibuffer-make-column-erc-modified 'ibuffer-column-name "M")
(defalias 'ibuffer-make-column-erc-server-name #[(buffer mark) "\210r	q\210\n\203�\305\n!\203�r\306\n!q\210\206�\f)\202 �\307)\207" [mark buffer erc-server-process erc-server-announced-name erc-session-server processp process-buffer ""] 2])
(put 'ibuffer-make-column-erc-server-name 'ibuffer-column-name "Server")
(defalias 'ibuffer-make-column-erc-target #[(buffer mark) "\210r	q\210\n\306=\203F�\203(�\307!\203(�p\310!=\203(�\311\f\312\313
!R\202H�\314\315 !\2036�\315 \260\202H�\315 \203B�\316\315 P\202H�\317\202H�\320 )\207" [mark buffer major-mode erc-server-process erc-session-server erc-session-port erc-mode processp process-buffer "Server " ":" erc-port-to-string erc-channel-p erc-default-target "Query: " "(parted)" buffer-name] 5])
(put 'ibuffer-make-column-erc-target 'ibuffer-column-name "Target")
(defalias 'ibuffer-make-column-erc-topic #[(buffer mark) "\210r	q\210\n\304=\203�\203�\305!\202�\306)\207" [mark buffer major-mode erc-channel-topic erc-mode erc-controls-interpret ""] 2])
(put 'ibuffer-make-column-erc-topic 'ibuffer-column-name "Topic")
(defalias 'ibuffer-make-column-erc-members #[(buffer mark) "\210r	q\210\n\304=\203(�\305\303!\203(�\306!\203(�\307!\310V\203(�\311\307!!\202)�\312)\207" [mark buffer major-mode erc-channel-users erc-mode boundp hash-table-p hash-table-size 0 number-to-string ""] 3])
(put 'ibuffer-make-column-erc-members 'ibuffer-column-name "Users")
(defalias 'ibuffer-make-column-erc-away #[(buffer mark) "\210r	q\210\n\203�\303\n!\203�\304 \203�\305\202�\306)\207" [mark buffer erc-server-process processp erc-away-time "A" " "] 2])
(put 'ibuffer-make-column-erc-away 'ibuffer-column-name "A")
(defalias 'ibuffer-make-column-erc-op #[(buffer mark) "\210r	q\210\n\306=\203H�\307 \211\205@�\310\f!\205@�\311\312!\f\"\211\205?�
A\205?�
A\313H>\204;�\314\315\316
AD\"\210
A\317H))\203H�\320\202I�\321)\207" [mark buffer major-mode #1=#:nick erc-channel-users cdata erc-mode erc-current-nick hash-table-p gethash erc-downcase 0 signal wrong-type-argument erc-channel-user 3 "@" " " cl-struct-erc-channel-user-tags] 5])
(put 'ibuffer-make-column-erc-op 'ibuffer-column-name "O")
(defalias 'ibuffer-make-column-erc-voice #[(buffer mark) "\210r	q\210\n\306=\203H�\307 \211\205@�\310\f!\205@�\311\312!\f\"\211\205?�
A\205?�
A\313H>\204;�\314\315\316
AD\"\210
A\317H))\203H�\320\202I�\321)\207" [mark buffer major-mode #1=#:nick erc-channel-users cdata erc-mode erc-current-nick hash-table-p gethash erc-downcase 0 signal wrong-type-argument erc-channel-user 1 "+" " " cl-struct-erc-channel-user-tags] 5])
(put 'ibuffer-make-column-erc-voice 'ibuffer-column-name "V")
(defalias 'ibuffer-make-column-erc-channel-modes #[(buffer mark) "\210r	q\210\n\306=\203-�G\307V\204�\f\203-�\310\311\312#\f\203'�\313\314\f\"\202(�\315\316Q\202=�\317\306!\204<�\320
\321\211p$\202=�\315)\207" [mark buffer major-mode erc-channel-modes erc-channel-user-limit mode-name erc-mode 0 apply concat "(+" format "l %d" "" ")" derived-mode-p format-mode-line nil] 5])
(put 'ibuffer-make-column-erc-channel-modes 'ibuffer-column-name "Mode")
(defalias 'ibuffer-make-column-erc-nick #[(buffer mark) "\210r	q\210\n\303=\203�\304 \202�\305)\207" [mark buffer major-mode erc-mode erc-current-nick ""] 2])
(put 'ibuffer-make-column-erc-nick 'ibuffer-column-name "Nick")
(defvar erc-ibuffer-formats '((mark erc-modified erc-away erc-op erc-voice " " (erc-nick 8 8) " " (erc-target 18 40) (erc-members 5 5 :center) (erc-channel-modes 6 16 :center) " " (erc-server-name 20 30) " " (erc-topic 10 -1)) (mark erc-modified erc-away erc-op erc-voice " " (erc-target 18 40) (erc-members 5 5 :center) (erc-channel-modes 9 20 :center) " " (erc-topic 10 -1))))
(byte-code "\302	\"\302\207" [ibuffer-formats erc-ibuffer-formats append] 3)
#@48 Prefix keymap to use for ERC related limiting.
(defvar erc-ibuffer-limit-map nil (#$ . 6449))
(byte-code "\301\302!\210\303\302\304\305#\210\303\306\302#\210\307\310!\207" [ibuffer-mode-map define-prefix-command erc-ibuffer-limit-map define-key "s" ibuffer-limit-by-erc-server "/" provide erc-ibuffer] 4)

${this.title}

Code Editor : erc-ibuffer.elc