Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
advice.elc	54 KB	-rw-r--r--
autoload.elc	28.25 KB	-rw-r--r--
avl-tree.elc	27.45 KB	-rw-r--r--
backquote.elc	4.68 KB	-rw-r--r--
backtrace.elc	40.98 KB	-rw-r--r--
benchmark.elc	3.74 KB	-rw-r--r--
bindat.elc	10.73 KB	-rw-r--r--
byte-opt.elc	39.59 KB	-rw-r--r--
byte-run.elc	17.44 KB	-rw-r--r--
bytecomp.elc	154.17 KB	-rw-r--r--
cconv.elc	20.71 KB	-rw-r--r--
chart.elc	25.98 KB	-rw-r--r--
check-declare.elc	9.01 KB	-rw-r--r--
checkdoc.elc	74.78 KB	-rw-r--r--
cl-extra.elc	29.37 KB	-rw-r--r--
cl-generic.elc	59.25 KB	-rw-r--r--
cl-indent.elc	18.03 KB	-rw-r--r--
cl-lib.elc	31.72 KB	-rw-r--r--
cl-loaddefs.el	45.79 KB	-rw-r--r--
cl-macs.elc	90.7 KB	-rw-r--r--
cl-preloaded.elc	27.28 KB	-rw-r--r--
cl-print.elc	14.77 KB	-rw-r--r--
cl-seq.elc	38.35 KB	-rw-r--r--
copyright.elc	10.17 KB	-rw-r--r--
crm.elc	7.62 KB	-rw-r--r--
cursor-sensor.elc	6.74 KB	-rw-r--r--
debug.elc	36.42 KB	-rw-r--r--
derived.elc	11.88 KB	-rw-r--r--
disass.elc	6.11 KB	-rw-r--r--
easy-mmode.elc	19.78 KB	-rw-r--r--
easymenu.elc	19.88 KB	-rw-r--r--
edebug.elc	123.13 KB	-rw-r--r--
eieio-base.elc	17.17 KB	-rw-r--r--
eieio-compat.elc	8.41 KB	-rw-r--r--
eieio-core.elc	36.91 KB	-rw-r--r--
eieio-custom.elc	15.8 KB	-rw-r--r--
eieio-datadebug.elc	3.17 KB	-rw-r--r--
eieio-loaddefs.el	3.96 KB	-rw-r--r--
eieio-opt.elc	9.32 KB	-rw-r--r--
eieio-speedbar.elc	13.13 KB	-rw-r--r--
eieio.elc	33.03 KB	-rw-r--r--
eldoc.elc	19.14 KB	-rw-r--r--
elint.elc	30.6 KB	-rw-r--r--
elp.elc	12.68 KB	-rw-r--r--
ert-x.elc	11.48 KB	-rw-r--r--
ert.elc	177.96 KB	-rw-r--r--
ewoc.elc	25.26 KB	-rw-r--r--
faceup.elc	16.97 KB	-rw-r--r--
find-func.elc	21.61 KB	-rw-r--r--
float-sup.elc	1.21 KB	-rw-r--r--
generator.elc	27.42 KB	-rw-r--r--
generic.elc	7.18 KB	-rw-r--r--
gv.elc	22.69 KB	-rw-r--r--
helper.elc	3.96 KB	-rw-r--r--
inline.elc	8.37 KB	-rw-r--r--
let-alist.elc	3.04 KB	-rw-r--r--
lisp-mnt.elc	22.59 KB	-rw-r--r--
lisp-mode.elc	38.03 KB	-rw-r--r--
lisp.elc	21.44 KB	-rw-r--r--
macroexp.elc	18.01 KB	-rw-r--r--
map-ynp.elc	10.54 KB	-rw-r--r--
map.elc	18.25 KB	-rw-r--r--
nadvice.elc	17.65 KB	-rw-r--r--
package-x.elc	9.06 KB	-rw-r--r--
package.elc	146.54 KB	-rw-r--r--
pcase.elc	23.11 KB	-rw-r--r--
pp.elc	5.5 KB	-rw-r--r--
radix-tree.elc	5.88 KB	-rw-r--r--
re-builder.elc	25.78 KB	-rw-r--r--
regexp-opt.elc	6.3 KB	-rw-r--r--
regi.elc	6 KB	-rw-r--r--
ring.elc	6.32 KB	-rw-r--r--
rmc.elc	4.79 KB	-rw-r--r--
rx.elc	40.69 KB	-rw-r--r--
seq.elc	23.64 KB	-rw-r--r--
shadow.elc	9.34 KB	-rw-r--r--
smie.elc	48.84 KB	-rw-r--r--
subr-x.elc	11.17 KB	-rw-r--r--
syntax.elc	26.13 KB	-rw-r--r--
tabulated-list.elc	26.57 KB	-rw-r--r--
tcover-ses.elc	14.29 KB	-rw-r--r--
tcover-unsafep.elc	3.87 KB	-rw-r--r--
testcover.elc	23.03 KB	-rw-r--r--
text-property-search.elc	8.13 KB	-rw-r--r--
thunk.elc	3.06 KB	-rw-r--r--
timer-list.elc	4.3 KB	-rw-r--r--
timer.elc	21.65 KB	-rw-r--r--
tq.elc	3.99 KB	-rw-r--r--
trace.elc	7.27 KB	-rw-r--r--
unsafep.elc	4.45 KB	-rw-r--r--
warnings.elc	9.75 KB	-rw-r--r--

Code Editor : rmc.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.

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

(require 'seq)
#@1286 Ask user a multiple choice question.
PROMPT should be a string that will be displayed as the prompt.

CHOICES is a list of (KEY NAME [DESCRIPTION]).  KEY is a
character to be entered.  NAME is a short name for the entry to
be displayed while prompting (if there's room, it might be
shortened).  DESCRIPTION is an optional longer explanation that
will be displayed in a help buffer if the user requests more
help.

This function translates user input into responses by consulting
the bindings in `query-replace-map'; see the documentation of
that variable for more information.  In this case, the useful
bindings are `recenter', `scroll-up', and `scroll-down'.  If the
user enters `recenter', `scroll-up', or `scroll-down' responses,
perform the requested window recentering or scrolling and ask
again.

When `use-dialog-box' is t (the default), this function can pop
up a dialog window to collect the user input.  That functionality
requires `display-popup-menus-p' to return t.  Otherwise, a
text dialog will be used.

The return value is the matching entry from the CHOICES list.

Usage example:

(read-multiple-choice "Continue connecting?"
                      \='((?a "always")
                        (?s "session only")
                        (?n "no")))

(fn PROMPT CHOICES)
(defalias 'read-multiple-choice #[514 "\306C\307\310\311\312\313\314\315\316	!\317\"\320\321%\322\323\"\324##\306\211\211\211\325 \312\326\327\315\316!\330\"\331$\216\212\204K\332\333\203<�\334\202=�\335#\210\336 \203a�\203a�	:\203a�\n\203a�\337\340\n\341\342\f\"B\"\202p�\3431n�\340\344 )0\202p�\210\306\262\345\f\316!\340#\262\346\267\202\325�\347 \210\340\202\326�\3501\223�\351 0\202\227�\210\202\230�\210\340\202\326�\3521\246�\353 0\202\252�\210\202\253�\210\340\202\326�\3541\271�\355 0\202\275�\210\202\276�\210\340\202\326�\3561\314�\357 0\202\320�\210\202\321�\210\340\202\326�\262\340=\203\344�\306\262\306\262\306=\204.�\236\204.�\360>?\262\306\262\203\361 \210
\306\211\223\210\362@B\363ABA@\364 B\365\366!\211\262\367!\211C\306\211rq\210\370 \210\371!\210\f\372\261\210\373 \374\245\375D\326`\211\205\211@b\210\326U\204\212\376\"\326U\203dd\211\262b\210\202\212m\204\212\306\210\377\376\"D\201E�\\_iZ\326]\201F�\"c\210\201G�y\210\202dT\262\201H�\201I�!r\211q\210\312\326\201J�\315\316!\201K�\"\331$\216\307\201L�@@\242\236A#c\210\201M�ed\"\210\3318\203\335`\3318c\210n\204\325\201N�c\210\201M�d\"\266\201O� *\262b\210\201P�\201N�\"\211\203\211@\306\210n\203\211\201N�\261\210\202	\211c\210\201G�y\210A\266\202\202\357\266A\266\202\202B\262)\266\203)\262rq\210\201Q�\306\"\262)\201R�\201S�!\203D\201S�\"\210)\266*\202.�*\210\201T�!\203[\201U�!\210\236\207" [last-input-event last-nonmenu-event use-dialog-box cursor-in-echo-area query-replace-map help-window-point-marker nil format "%s (%s): " mapconcat make-byte-code 257 "\211A@\301@\"\211\204�\302\303@#\202G�\304\305\306 \"\2030�\307!\262\310\211T\311\312%\210\202G�\313\314#\315\313\211T#\226\316\313T\"\260\300@B\300\242B\240\210\207" vconcat vector [seq-position format "[%c] %s" display-supports-face-attributes-p (:underline t) window-frame copy-sequence put-text-property face read-multiple-choice-face substring 0 "[" "]"] 10 "\n\n(fn ELEM)" append ((63 "?")) ", " current-window-configuration 0 "\301\300!\207" [set-window-configuration] 2 message "%s%s" "Invalid choice.  " "" display-popup-menus-p x-popup-dialog t mapcar #[257 "\300A@!@B\207" [capitalize] 3 "\n\n(fn ELEM)"] (error) read-event lookup-key #s(hash-table size 5 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (recenter 130 scroll-up 137 scroll-down 156 scroll-other-window 175 scroll-other-window-down 194)) recenter (error) scroll-up-command (error) scroll-down-command (error) scroll-other-window (error) scroll-other-window-down (63 8) ding help-mode-setup help-mode-finish selected-frame get-buffer-create "*Multiple Choice Help*" temp-buffer-window-setup erase-buffer pop-to-buffer "\n\n" window-width 25 21 mod make-string temp-buffer-window-setup-hook temp-buffer-window-show-hook help-window-old-frame standard-output fill-column 4 32 1 generate-new-buffer " *temp*" "\301\300!\205	�\302\300!\207" [buffer-name kill-buffer] "%c: %s\n" fill-region "\n" buffer-string split-string temp-buffer-window-show functionp help-window-setup buffer-live-p kill-buffer] 25 (#$ . 425)])
(provide 'rmc)

${this.title}

Code Editor : rmc.elc