Gecko [ goons4good.org ]

Name	Size	Permission	Date
advice.elc	58.25 KB	-rw-r--r--	2023-06-07 04:04
authors.elc	30.49 KB	-rw-r--r--	2023-06-07 04:04
autoload.elc	21.31 KB	-rw-r--r--	2023-06-07 03:59
avl-tree.elc	27.02 KB	-rw-r--r--	2023-06-07 04:04
backquote.elc	4.4 KB	-rw-r--r--	2023-06-07 04:18
benchmark.elc	3.18 KB	-rw-r--r--	2023-06-07 04:04
bindat.elc	10.69 KB	-rw-r--r--	2023-06-07 04:04
byte-opt.elc	35.7 KB	-rw-r--r--	2023-06-07 03:59
byte-run.elc	12.35 KB	-rw-r--r--	2023-06-07 04:18
bytecomp.elc	136.26 KB	-rw-r--r--	2023-06-07 03:59
cconv.elc	15.61 KB	-rw-r--r--	2023-06-07 03:59
chart.elc	22.14 KB	-rw-r--r--	2023-06-07 04:04
check-declare.elc	8.87 KB	-rw-r--r--	2023-06-07 04:04
checkdoc.elc	67.42 KB	-rw-r--r--	2023-06-07 04:04
cl-extra.elc	20.01 KB	-rw-r--r--	2023-06-07 04:04
cl-indent.elc	16.34 KB	-rw-r--r--	2023-06-07 04:04
cl-lib.elc	34.86 KB	-rw-r--r--	2023-06-07 04:04
cl-loaddefs.el	39.75 KB	-rw-r--r--	2013-01-01 15:37
cl-macs.elc	71.79 KB	-rw-r--r--	2023-06-07 04:04
cl-seq.elc	40.03 KB	-rw-r--r--	2023-06-07 04:04
cl.elc	16 KB	-rw-r--r--	2023-06-07 04:04
copyright.elc	10.29 KB	-rw-r--r--	2023-06-07 04:04
crm.elc	7.76 KB	-rw-r--r--	2023-06-07 04:04
debug.elc	26.92 KB	-rw-r--r--	2023-06-07 04:04
derived.elc	11.27 KB	-rw-r--r--	2023-06-07 04:04
disass.elc	5.48 KB	-rw-r--r--	2023-06-07 04:04
easy-mmode.elc	16.81 KB	-rw-r--r--	2023-06-07 04:04
easymenu.elc	20.03 KB	-rw-r--r--	2023-06-07 04:04
edebug.elc	101.25 KB	-rw-r--r--	2023-06-07 04:04
eieio-base.elc	13.18 KB	-rw-r--r--	2023-06-07 04:04
eieio-custom.elc	14.55 KB	-rw-r--r--	2023-06-07 04:04
eieio-datadebug.elc	3.9 KB	-rw-r--r--	2023-06-07 04:04
eieio-opt.elc	20.79 KB	-rw-r--r--	2023-06-07 04:04
eieio-speedbar.elc	12.55 KB	-rw-r--r--	2023-06-07 04:04
eieio.elc	89.24 KB	-rw-r--r--	2023-06-07 04:04
eldoc.elc	15.33 KB	-rw-r--r--	2023-06-07 04:04
elint.elc	31.22 KB	-rw-r--r--	2023-06-07 04:04
elp.elc	12.43 KB	-rw-r--r--	2023-06-07 04:04
ert-x.elc	9.78 KB	-rw-r--r--	2023-06-07 04:04
ert.elc	169.71 KB	-rw-r--r--	2023-06-07 04:04
ewoc.elc	26.49 KB	-rw-r--r--	2023-06-07 04:04
find-func.elc	17.4 KB	-rw-r--r--	2023-06-07 04:04
find-gc.elc	3.54 KB	-rw-r--r--	2023-06-07 04:04
float-sup.elc	1.36 KB	-rw-r--r--	2023-06-07 04:19
generic.elc	6.68 KB	-rw-r--r--	2023-06-07 04:04
gulp.elc	4.69 KB	-rw-r--r--	2023-06-07 04:04
gv.elc	17.81 KB	-rw-r--r--	2023-06-07 04:04
helper.elc	4.03 KB	-rw-r--r--	2023-06-07 04:04
lisp-mnt.elc	22.41 KB	-rw-r--r--	2023-06-07 04:04
lisp-mode.elc	44.27 KB	-rw-r--r--	2023-06-07 04:19
lisp.elc	18.56 KB	-rw-r--r--	2023-06-07 04:19
macroexp.elc	12.84 KB	-rw-r--r--	2023-06-07 04:18
map-ynp.elc	6.42 KB	-rw-r--r--	2023-06-07 04:18
package-x.elc	8.32 KB	-rw-r--r--	2023-06-07 04:04
package.elc	54.49 KB	-rw-r--r--	2023-06-07 04:04
pcase.elc	15.98 KB	-rw-r--r--	2023-06-07 04:04
pp.elc	5.56 KB	-rw-r--r--	2023-06-07 04:04
re-builder.elc	22.81 KB	-rw-r--r--	2023-06-07 04:04
regexp-opt.elc	4.87 KB	-rw-r--r--	2023-06-07 04:19
regi.elc	6.09 KB	-rw-r--r--	2023-06-07 04:04
ring.elc	6.58 KB	-rw-r--r--	2023-06-07 04:04
rx.elc	27.41 KB	-rw-r--r--	2023-06-07 04:04
shadow.elc	9.75 KB	-rw-r--r--	2023-06-07 04:04
smie.elc	35.4 KB	-rw-r--r--	2023-06-07 04:04
syntax.elc	13.69 KB	-rw-r--r--	2023-06-07 04:19
tabulated-list.elc	19.12 KB	-rw-r--r--	2023-06-07 04:19
tcover-ses.elc	15 KB	-rw-r--r--	2023-06-07 04:04
tcover-unsafep.elc	4.02 KB	-rw-r--r--	2023-06-07 04:04
testcover.elc	13.4 KB	-rw-r--r--	2023-06-07 04:04
timer.elc	22.94 KB	-rw-r--r--	2023-06-07 04:19
tq.elc	3.89 KB	-rw-r--r--	2023-06-07 04:04
trace.elc	5.24 KB	-rw-r--r--	2023-06-07 04:04
unsafep.elc	4.92 KB	-rw-r--r--	2023-06-07 04:04
warnings.elc	9.53 KB	-rw-r--r--	2023-06-07 04:04

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:18:58 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/emacs-lisp/map-ynp.el
;;; in Emacs version 24.3
;;; 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.

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

#@1922 Ask a series of boolean questions.
Takes args PROMPTER ACTOR LIST, and optional args HELP and ACTION-ALIST.

LIST is a list of objects, or a function of no arguments to return the next
object or nil.

If PROMPTER is a string, the prompt is (format PROMPTER OBJECT).  If not
a string, PROMPTER is a function of one arg (an object from LIST), which
returns a string to be used as the prompt for that object.  If the return
value is not a string, it may be nil to ignore the object or non-nil to act
on the object without asking the user.

ACTOR is a function of one arg (an object from LIST),
which gets called with each object that the user answers `yes' for.

If HELP is given, it is a list (OBJECT OBJECTS ACTION),
where OBJECT is a string giving the singular noun for an elt of LIST;
OBJECTS is the plural noun for elts of LIST, and ACTION is a transitive
verb describing ACTOR.  The default is ("object" "objects" "act on").

At the prompts, the user may enter y, Y, or SPC to act on that object;
n, N, or DEL to skip that object; ! to act on all following objects;
ESC or q to exit (skip all following objects); . (period) to act on the
current object and then exit; or \[help-command] to get help.

If ACTION-ALIST is given, it is an alist (KEY FUNCTION HELP) of extra keys
that will be accepted.  KEY is a character; FUNCTION is a function of one
arg (an object from LIST); HELP is a string.  When the user hits KEY,
FUNCTION is called.  If it returns non-nil, the object is considered
"acted upon", and the next object from LIST is processed.  If it returns
nil, the prompt is repeated for the same object.

Final optional argument NO-CURSOR-IN-ECHO-AREA non-nil says not to set
`cursor-in-echo-area' while prompting.

This function uses `query-replace-map' to define the standard responses,
but not all of the responses which `query-replace' understands
are meaningful here.

Returns the number of actions taken.
(defalias 'map-y-or-n-p #[(prompter actor list &optional help action-alist no-cursor-in-echo-area) "\306\307\211\307\211\307\211@\307\211AB\307\211CDEE\310F!\203*�\311\202+�\312=G<\203\227�H\203\227�?\205B�\313?@!?\205M�\313?A@!?\205X�\313\314?8!IJK\315\316\317\320\321L\"?\203r�I\322P\202s�\323\324B?\203\203�I\325JQ\202\204�\326\327B\330BB\"BB\331CG+\202\336�L\203\247�\332\333L\334#\335P\202\250�\336\337 \340M\"\210L\307@\211N\203\332�N@@\341\342@@!\342@A@!#\210NA\211N\204\275�*)\343\216O;\203\361�\344\345\346O\347BBEO= \203{O@!\211;\203k\307PC\203\350\n\206C\fB\"\206\351B\202dQ?\307RS\352\353\354\355T#\f	\356\342U!!$\210V\203C\357\360\361 !!\210\362 \211\363\232\204C\352\364\f	\356\342U!!\365
!%\210*\366\342
!\"BB\367=\203r\370\211=\202\363�B\371=\203\205W@!\210T\202\361�B\372=\204\361�B\324=\203\243W@!\210T\373\211=\202\363�B\351=\203\301\331P\344\307\374\375\376=DE\376@DF\211=\202\363�B\327=\203\363O@!\203\331W@!\210T= \203\361�O@!\203\331W@!\210T\202\331B\377=\203\302XYr\201a�\201b�!q\210p\201c� \210YX\307\211Z[\331\211\\\331]^\201d� \210\201e�\201f�!\210+\211_`\201g�?\203B?@\202E\201h�?\203Q?A@\202T\201i�?\203`\314?8\202c\201j�IJK\346\201k�IK\211IJIJ&\332\201l�L\201m�#L\205\216\201m�\346\201n�IK#R+!\210r`q\210\201o� \210)\201p�_!\210+\344\307\374\375\376=DE\376@DF\211=\202\363�B9\203\354\201q�B!\203\354\201r�B!\210\344\307\374\375\376=DE\376@DF\211=\202\363�\201s�B!\203B\306H@!\203T\202\361�\344\307\374\375\376=DE\376@DF\211=\202\363�
:\203>
@\201t�=\203>
D\344\307\374\375\376=DE\376@DF\211=\202\363�\352\201u�\356\342U!!\"\210\201v� \210\201w�\201x�!\210\344\307\374\375\376=DE\376@DF\211=\202\363�\f\203\361�W@!\210T\202\361�)\307R\352\336!\210).
\207" [actions user-keys mouse-event map prompt char 0 nil functionp #[nil " \211\207" [list elt] 2] #[nil "\205�\211A@\302\207" [list elt t] 2] capitalize 2 ("Yes" . act) ("No" . skip) append mapcar #[(elt) "\304 p\305\216\306\n!\210\307\3108!+\311A@!B\207" [#1=#:buffer #2=#:table text-mode-syntax-table elt syntax-table ((byte-code "rq\210\302	!\210)\302\207" [#1# #2# set-syntax-table] 2)) set-syntax-table capitalize 2 vector] 3] " This But No More" "Do This But No More" act-and-exit " All " "Do All" automatic (("No For All" . exit)) t mapconcat #[(elt) "\301\302@!!\207" [elt key-description vector] 3] ", " " " "" make-sparse-keymap set-keymap-parent define-key vector ((byte-code "\203�	B\302\207" [delayed-switch-frame unread-command-events nil] 2)) lambda (object) format (object) x-popup-dialog quit message apply propertize "%s(y, n, !, ., q, %sor %s) " key-description raise-frame window-frame minibuffer-window read-event -1 "%s(y, n, !, ., q, %sor %s) %s" single-key-description lookup-key exit #[nil "\300\207" [nil] 1] act skip #[nil "\300\207" [nil] 1] setq next quote help elt tail def use-menus delayed-switch-frame other-window-scroll-buffer list last-nonmenu-event use-dialog-box action objects object action-alist query-replace-map --dolist-tail-- prompter quit-flag no-cursor-in-echo-area message-log-max cursor-in-echo-area minibuffer-prompt-properties help-char minibuffer-auto-raise actor default-directory #3=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #4=#:buf standard-output get-buffer-create "*Help*" kill-all-local-variables erase-buffer run-hooks temp-buffer-setup-hook princ "object" "objects" "act on" "Type SPC or `y' to %s the current %s;\nDEL or `n' to skip the current %s;\nRET or `q' to give up on the %s (skip all remaining %s);\nC-g to quit (cancel the whole command);\n! to %s all remaining %s;\n" #[(elt) "\301\302\303@!\3048#\207" [elt format "%s to %s" single-key-description 2] 5] ";\n" "or . (period) to %s the current %s and exit." help-mode internal-temp-output-buffer-show commandp call-interactively vectorp switch-frame "Type %s for help." beep sit-for 1] 11 (#$ . 557)])