Gecko [ 122.154.134.11 ]

Name	Size	Permission
advice.elc	60.71 KB	-rw-r--r--
assoc.elc	4.37 KB	-rw-r--r--
authors.elc	27.41 KB	-rw-r--r--
autoload.elc	15.7 KB	-rw-r--r--
avl-tree.elc	15.92 KB	-rw-r--r--
backquote.elc	4.46 KB	-rw-r--r--
benchmark.elc	3.33 KB	-rw-r--r--
bindat.elc	10.84 KB	-rw-r--r--
byte-opt.elc	34.22 KB	-rw-r--r--
byte-run.elc	6.65 KB	-rw-r--r--
bytecomp.elc	124.99 KB	-rw-r--r--
check-declare.elc	8.77 KB	-rw-r--r--
checkdoc.elc	65.08 KB	-rw-r--r--
cl-compat.elc	4.28 KB	-rw-r--r--
cl-extra.elc	21.48 KB	-rw-r--r--
cl-indent.elc	13.98 KB	-rw-r--r--
cl-loaddefs.el	39.57 KB	-rw-r--r--
cl-macs.elc	99.36 KB	-rw-r--r--
cl-seq.elc	43.98 KB	-rw-r--r--
cl-specs.el	13.87 KB	-rw-r--r--
cl.elc	20.74 KB	-rw-r--r--
copyright.elc	8.64 KB	-rw-r--r--
crm.elc	7.94 KB	-rw-r--r--
cust-print.elc	12.77 KB	-rw-r--r--
debug.elc	24.86 KB	-rw-r--r--
derived.elc	10.72 KB	-rw-r--r--
disass.elc	5.09 KB	-rw-r--r--
easy-mmode.elc	14.85 KB	-rw-r--r--
easymenu.elc	20.15 KB	-rw-r--r--
edebug.elc	100.82 KB	-rw-r--r--
eldoc.elc	15.31 KB	-rw-r--r--
elint.elc	19.76 KB	-rw-r--r--
elp.elc	12.78 KB	-rw-r--r--
ewoc.elc	28.62 KB	-rw-r--r--
find-func.elc	17.26 KB	-rw-r--r--
find-gc.elc	3.74 KB	-rw-r--r--
float-sup.elc	1.39 KB	-rw-r--r--
generic.elc	6.55 KB	-rw-r--r--
gulp.elc	4.82 KB	-rw-r--r--
helper.elc	3.84 KB	-rw-r--r--
levents.elc	10.29 KB	-rw-r--r--
lisp-mnt.elc	21.87 KB	-rw-r--r--
lisp-mode.elc	37.14 KB	-rw-r--r--
lisp.elc	21.61 KB	-rw-r--r--
lmenu.elc	11.67 KB	-rw-r--r--
lucid.elc	6.22 KB	-rw-r--r--
macroexp.elc	4.45 KB	-rw-r--r--
map-ynp.elc	6.3 KB	-rw-r--r--
pp.elc	5.09 KB	-rw-r--r--
re-builder.elc	22.36 KB	-rw-r--r--
regexp-opt.elc	4.43 KB	-rw-r--r--
regi.elc	6.15 KB	-rw-r--r--
ring.elc	6.41 KB	-rw-r--r--
rx.elc	26.61 KB	-rw-r--r--
shadow.elc	5.63 KB	-rw-r--r--
sregex.elc	12.45 KB	-rw-r--r--
syntax.elc	5.18 KB	-rw-r--r--
tcover-ses.elc	14.68 KB	-rw-r--r--
tcover-unsafep.elc	4.09 KB	-rw-r--r--
testcover.elc	13.41 KB	-rw-r--r--
timer.elc	22.73 KB	-rw-r--r--
tq.elc	3.94 KB	-rw-r--r--
trace.elc	5.28 KB	-rw-r--r--
unsafep.elc	5.01 KB	-rw-r--r--
warnings.elc	9.61 KB	-rw-r--r--

Code Editor : map-ynp.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:02:17 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/emacs-lisp/map-ynp.el
;;; in Emacs version 23.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 "`map-ynp.el' was compiled for Emacs 19.29 or later"))

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

#@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+�\312GH<\203\227�I\203\227�J\205B�\313J@!J\205M�\313JA@!J\205X�\313\314J8!KLM\315\316\317\320\321N\"J\203r�K\322P\202s�\323\324BJ\203\203�K\325LQ\202\204�\326\327B\330BB\"BB\331CH+\202\366�N\203\247�\332\333N\334#\335P\202\250�\336\337 \340O\"\210\341\342\343#\210\341\344\343#\210\341\345\346#\210\341\347\346#\210N\307@\211P\203\362�P@@\341\350@@!\350@A@!#\210PA\211P\204\325�*)\351\216Q;\203	\352\353\354Q\355BBEQG \203\214Q@!\211;\203|\307RC\2036\356\n\206)C\fB\"\2061\357B\202|S?\307TU\360\361\362\363V#\f	\364\350W!!$\210X\203[\365\366\367 !!\210\370 \211\371\232\204[\360\372\f	\364\350W!!\373
!%\210*\374\350
!\"BB\375=\203\212\376\211G\202B\377=\203\235Y@!\210T\202	B\201[�=\204	B\324=\203\277Y@!\210T\201\\�\211G\202B\357=\203\345\331R\352\307\201]�\201G�\201^�GDE\201^�@DF\211G\202B\327=\203Q@!\203\375Y@!\210TG \203	Q@!\203\375Y@!\210T\202\375B\201J�=\203\263\201_�\220\201`�J\2032J@\2025\201a�J\203AJA@\202D\201b�J\203P\314J8\202S\201c�KLM\354\201d�KM\211KLKL&\332\201e�N\201f�#N\205~\201f�\354\201g�KM#R+!\210rZq\210\201h� )\221\210\352\307\201]�\201G�\201^�GDE\201^�@DF\211G\202B9\203\345\201i�B!\203\345\201j�B!\210\352\307\201]�\201G�\201^�GDE\201^�@DF\211G\202\201k�B!\203B\306H@!\203\376T\202	\352\307\201]�\201G�\201^�GDE\201^�@DF\211G\202
:\203G
@\201l�=\203G
D\352\307\201]�\201G�\201^�GDE\201^�@DF\211G\202\360\201m�\364\350W!!\"\210\201n� \210\201o�\201p�!\210\352\307\201]�\201G�\201^�GDE\201^�@DF\211G\202\f\203	Y@!\210T\202	)\307T\360\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 [134217750] scroll-other-window [M-next] [167772182] scroll-other-window-down [M-prior] 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 elt tail def use-menus delayed-switch-frame other-window-scroll-buffer list next last-nonmenu-event use-dialog-box help action objects object action-alist query-replace-map #3=#:--cl-dolist-temp-- prompter quit-flag no-cursor-in-echo-area message-log-max cursor-in-echo-area minibuffer-prompt-properties help-char minibuffer-auto-raise actor standard-output skip #[nil "\300\207" [nil] 1] setq quote "*Help*" 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 commandp call-interactively vectorp switch-frame "Type %s for help." beep sit-for 1] 12 (#$ . 616)])

${this.title}

Code Editor : map-ynp.elc