Gecko [ 122.154.134.11 ]

Name	Size	Permission
erc-autoaway.elc	11.58 KB	-rw-r--r--
erc-backend.elc	154.28 KB	-rw-r--r--
erc-button.elc	16.69 KB	-rw-r--r--
erc-capab.elc	7.67 KB	-rw-r--r--
erc-compat.elc	4.38 KB	-rw-r--r--
erc-dcc.elc	39.39 KB	-rw-r--r--
erc-ezbounce.elc	5.19 KB	-rw-r--r--
erc-fill.elc	6.71 KB	-rw-r--r--
erc-goodies.elc	32.55 KB	-rw-r--r--
erc-hecomplete.elc	7.96 KB	-rw-r--r--
erc-ibuffer.elc	6.77 KB	-rw-r--r--
erc-identd.elc	4.86 KB	-rw-r--r--
erc-imenu.elc	2.61 KB	-rw-r--r--
erc-join.elc	6.03 KB	-rw-r--r--
erc-lang.elc	4.68 KB	-rw-r--r--
erc-list.elc	9.25 KB	-rw-r--r--
erc-log.elc	14.83 KB	-rw-r--r--
erc-match.elc	19.02 KB	-rw-r--r--
erc-menu.elc	6.15 KB	-rw-r--r--
erc-netsplit.elc	7.94 KB	-rw-r--r--
erc-networks.elc	39.94 KB	-rw-r--r--
erc-notify.elc	9.37 KB	-rw-r--r--
erc-page.elc	4.88 KB	-rw-r--r--
erc-pcomplete.elc	10.62 KB	-rw-r--r--
erc-replace.elc	3.85 KB	-rw-r--r--
erc-ring.elc	5.21 KB	-rw-r--r--
erc-services.elc	15.01 KB	-rw-r--r--
erc-sound.elc	5.59 KB	-rw-r--r--
erc-speedbar.elc	10 KB	-rw-r--r--
erc-spelling.elc	4.66 KB	-rw-r--r--
erc-stamp.elc	14.9 KB	-rw-r--r--
erc-track.elc	34.83 KB	-rw-r--r--
erc-truncate.elc	4.18 KB	-rw-r--r--
erc-xdcc.elc	5.74 KB	-rw-r--r--
erc.elc	219.16 KB	-rw-r--r--

Code Editor : erc-truncate.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:03:05 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/erc/erc-truncate.el
;;; in Emacs version 23.1.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`erc-truncate.el' was compiled for Emacs 19.29 or later"))

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

(byte-code "\300\301!\210\302\303\304\305\306\301%\207" [require erc custom-declare-group erc-truncate nil "Truncate buffers when they reach a certain size" :group] 6)
#@143 *Maximum size in chars of each ERC buffer.
Used only when auto-truncation is enabled.
(see `erc-truncate-buffer' and `erc-insert-post-hook').
(custom-declare-variable 'erc-max-buffer-size '30000 '(#$ . -788) :group 'erc-truncate :type 'integer)
#@272 Non-nil if Erc-Truncate mode is enabled.
See the command `erc-truncate-mode' for a description of this minor mode.
Setting this variable directly does not take effect;
either customize it (see the info node `Easy Customization')
or call the function `erc-truncate-mode'.
(custom-declare-variable 'erc-truncate-mode 'nil '(#$ . 1040) :set 'custom-set-minor-mode :initialize 'custom-initialize-default :group 'erc-truncate :type 'boolean)
#@300 Toggle ERC truncate mode.
With arg, turn ERC truncate mode on if and only if arg is positive.
Truncate a query buffer if it gets too large.
This prevents the query buffer from getting too large, which can
bring any grown Emacs to its knees after a few days worth of
tracking heavy-traffic channels.
(defalias 'erc-truncate-mode #[(&optional arg) "\303 	\304=\203�\n?\202(�	\203�\305	!\306V\202(�\n\204\"�\307\202(�\310\311\302\"\210\312\211\2033�\313 \210\2026�\314 \210\315\316\n\203@�\317\202A�\320\"\210\321 \203e�\322\302!\210\303 \203X�\303 \232\203e�\310\323\n\203b�\324\202c�\325\"\210)\326 \210\n\207" [#1=#:last-message arg erc-truncate-mode current-message toggle prefix-numeric-value 0 t message "Toggling %s off; better pass an explicit argument." nil erc-truncate-enable erc-truncate-disable run-hooks erc-truncate-mode-hook erc-truncate-mode-on-hook erc-truncate-mode-off-hook called-interactively-p customize-mark-as-set "Erc-Truncate mode %sabled" "en" "dis" force-mode-line-update] 4 (#$ . 1484) (list (or current-prefix-arg 'toggle))])
(byte-code "\300\301\302\303\304!\205�\304J#\207" [add-minor-mode erc-truncate-mode nil boundp erc-truncate-mode-map] 5)
#@27 Enable ERC truncate mode.
(defalias 'erc-truncate-enable #[nil "\301\302\303\"\210\304\305\306\307\"\207" [erc-truncate-mode add-to-list erc-modules truncate t add-hook erc-insert-post-hook erc-truncate-buffer] 3 (#$ . 2671) nil])
#@28 Disable ERC truncate mode.
(defalias 'erc-truncate-disable #[nil "\302\303\"\304\305\306\307\"\207" [erc-modules erc-truncate-mode delq truncate nil remove-hook erc-insert-post-hook erc-truncate-buffer] 3 (#$ . 2909) nil])
(byte-code "\300\301\302\303#\210\300\304\302\303#\210\300\305\302\303#\207" [put erc-truncate-mode definition-name truncate erc-truncate-enable erc-truncate-disable] 4)
#@170 Truncates the buffer to the size SIZE.
If BUFFER is not provided, the current buffer is assumed.  The deleted
region is logged if `erc-logging-enabled' returns non-nil.
(defalias 'erc-truncate-buffer-to-size #[(size &optional buffer) "\204	�p\202�\306!\204�\307\310\"\210\311!	\312\\V\205Q�\212q\210\214~\210\n	Z\211b\210\313 \210`\314\304!\203D�\f\203D�\315!\203D�\316 \210\317 \210\320e|\210*\321 *\207" [buffer size erc-insert-marker end erc-enable-logging inhibit-read-only get-buffer error "erc-truncate-buffer-to-size: %S is not a buffer" buffer-size 512 beginning-of-line boundp erc-logging-enabled erc-save-buffer-in-logs buffer-disable-undo t buffer-enable-undo] 4 (#$ . 3312)])
#@112 Truncates the current buffer to `erc-max-buffer-size'.
Meant to be used in hooks, like `erc-insert-post-hook'.
(defalias 'erc-truncate-buffer #[nil "\301!\207" [erc-max-buffer-size erc-truncate-buffer-to-size] 2 (#$ . 4020) nil])
(provide 'erc-truncate)

${this.title}

Code Editor : erc-truncate.elc