Gecko [ 122.154.134.11 ]

Name	Size	Permission
calc	[ DIR ]	drwxr-xr-x
calendar	[ DIR ]	drwxr-xr-x
emacs-lisp	[ DIR ]	drwxr-xr-x
emulation	[ DIR ]	drwxr-xr-x
erc	[ DIR ]	drwxr-xr-x
eshell	[ DIR ]	drwxr-xr-x
gnus	[ DIR ]	drwxr-xr-x
international	[ DIR ]	drwxr-xr-x
language	[ DIR ]	drwxr-xr-x
mail	[ DIR ]	drwxr-xr-x
mh-e	[ DIR ]	drwxr-xr-x
net	[ DIR ]	drwxr-xr-x
nxml	[ DIR ]	drwxr-xr-x
obsolete	[ DIR ]	drwxr-xr-x
org	[ DIR ]	drwxr-xr-x
play	[ DIR ]	drwxr-xr-x
progmodes	[ DIR ]	drwxr-xr-x
term	[ DIR ]	drwxr-xr-x
textmodes	[ DIR ]	drwxr-xr-x
url	[ DIR ]	drwxr-xr-x
COPYING	34.32 KB	-rw-r--r--
README	538 B	-rw-r--r--
abbrev.elc	29.69 KB	-rw-r--r--
abbrevlist.elc	1.12 KB	-rw-r--r--
add-log.elc	35.21 KB	-rw-r--r--
align.elc	38.38 KB	-rw-r--r--
allout.elc	208.3 KB	-rw-r--r--
ansi-color.elc	16.3 KB	-rw-r--r--
apropos.elc	31.93 KB	-rw-r--r--
arc-mode.elc	54.72 KB	-rw-r--r--
array.elc	25.83 KB	-rw-r--r--
autoarg.elc	5.98 KB	-rw-r--r--
autoinsert.elc	12.01 KB	-rw-r--r--
autorevert.elc	18.25 KB	-rw-r--r--
avoid.elc	10.17 KB	-rw-r--r--
battery.elc	17.98 KB	-rw-r--r--
bindings.elc	39.04 KB	-rw-r--r--
bookmark.elc	55.9 KB	-rw-r--r--
bs.elc	48.34 KB	-rw-r--r--
buff-menu.elc	28 KB	-rw-r--r--
button.elc	13.92 KB	-rw-r--r--
calculator.elc	49.18 KB	-rw-r--r--
case-table.elc	4.42 KB	-rw-r--r--
cdl.elc	1.26 KB	-rw-r--r--
chistory.elc	5.75 KB	-rw-r--r--
cmuscheme.elc	17.43 KB	-rw-r--r--
comint.elc	100.97 KB	-rw-r--r--
compare-w.elc	10.98 KB	-rw-r--r--
complete.elc	23.62 KB	-rw-r--r--
completion.elc	45.06 KB	-rw-r--r--
composite.elc	29.39 KB	-rw-r--r--
cus-dep.elc	5.04 KB	-rw-r--r--
cus-edit.elc	129.67 KB	-rw-r--r--
cus-face.elc	10.46 KB	-rw-r--r--
cus-load.el	63.45 KB	-rw-r--r--
cus-start.elc	10.67 KB	-rw-r--r--
cus-theme.elc	13.7 KB	-rw-r--r--
custom.elc	36.46 KB	-rw-r--r--
cvs-status.elc	23 KB	-rw-r--r--
dabbrev.elc	23.08 KB	-rw-r--r--
delim-col.elc	8.41 KB	-rw-r--r--
delsel.elc	5.24 KB	-rw-r--r--
descr-text.elc	20.69 KB	-rw-r--r--
desktop.elc	34.52 KB	-rw-r--r--
dframe.elc	22.51 KB	-rw-r--r--
diff-mode.elc	55.58 KB	-rw-r--r--
diff.elc	5.51 KB	-rw-r--r--
dired-aux.elc	67.5 KB	-rw-r--r--
dired-x.elc	44.96 KB	-rw-r--r--
dired.elc	96.48 KB	-rw-r--r--
dirtrack.elc	7.39 KB	-rw-r--r--
disp-table.elc	8.33 KB	-rw-r--r--
dnd.elc	7.04 KB	-rw-r--r--
doc-view.elc	36.01 KB	-rw-r--r--
dos-fns.elc	5.53 KB	-rw-r--r--
dos-vars.elc	1.24 KB	-rw-r--r--
dos-w32.elc	11.12 KB	-rw-r--r--
double.elc	4.13 KB	-rw-r--r--
ebuff-menu.elc	9.11 KB	-rw-r--r--
echistory.elc	4.93 KB	-rw-r--r--
ediff-diff.elc	35.54 KB	-rw-r--r--
ediff-help.elc	11.47 KB	-rw-r--r--
ediff-hook.elc	5.89 KB	-rw-r--r--
ediff-init.elc	60.88 KB	-rw-r--r--
ediff-merg.elc	10.04 KB	-rw-r--r--
ediff-mult.elc	58.31 KB	-rw-r--r--
ediff-ptch.elc	18.63 KB	-rw-r--r--
ediff-util.elc	118.44 KB	-rw-r--r--
ediff-vers.elc	4.74 KB	-rw-r--r--
ediff-wind.elc	30.56 KB	-rw-r--r--
ediff.elc	36.28 KB	-rw-r--r--
edmacro.elc	21.45 KB	-rw-r--r--
ehelp.elc	11.03 KB	-rw-r--r--
electric.elc	2.81 KB	-rw-r--r--
elide-head.elc	2.8 KB	-rw-r--r--
emacs-lock.elc	2.77 KB	-rw-r--r--
emerge.elc	80.16 KB	-rw-r--r--
env.elc	5.69 KB	-rw-r--r--
epa-dired.elc	1.87 KB	-rw-r--r--
epa-file.elc	6.77 KB	-rw-r--r--
epa-hook.elc	4.28 KB	-rw-r--r--
epa-mail.elc	7.04 KB	-rw-r--r--
epa.elc	34.03 KB	-rw-r--r--
epg-config.elc	4.01 KB	-rw-r--r--
epg.elc	85.05 KB	-rw-r--r--
expand.elc	9.42 KB	-rw-r--r--
ezimage.elc	9.2 KB	-rw-r--r--
face-remap.elc	13.15 KB	-rw-r--r--
facemenu.elc	23.61 KB	-rw-r--r--
faces.elc	81.51 KB	-rw-r--r--
ffap.elc	46.14 KB	-rw-r--r--
filecache.elc	16.1 KB	-rw-r--r--
files.elc	175.25 KB	-rw-r--r--
filesets.elc	73.03 KB	-rw-r--r--
find-cmd.elc	4.94 KB	-rw-r--r--
find-dired.elc	7.4 KB	-rw-r--r--
find-file.elc	18.68 KB	-rw-r--r--
find-lisp.elc	7.42 KB	-rw-r--r--
finder-inf.el	93.47 KB	-rw-r--r--
finder.elc	12.11 KB	-rw-r--r--
flow-ctrl.elc	2.44 KB	-rw-r--r--
foldout.elc	7.6 KB	-rw-r--r--
follow.elc	37.11 KB	-rw-r--r--
font-core.elc	12.92 KB	-rw-r--r--
font-lock.elc	61.1 KB	-rw-r--r--
format-spec.elc	1.98 KB	-rw-r--r--
format.elc	27.73 KB	-rw-r--r--
forms-d2.el	3.13 KB	-rw-r--r--
forms-pass.el	742 B	-rw-r--r--
forms.elc	35.13 KB	-rw-r--r--
frame.elc	48.66 KB	-rw-r--r--
fringe.elc	8.01 KB	-rw-r--r--
generic-x.elc	44.25 KB	-rw-r--r--
gs.elc	3.93 KB	-rw-r--r--
help-at-pt.elc	11.27 KB	-rw-r--r--
help-fns.elc	21.77 KB	-rw-r--r--
help-macro.elc	4.37 KB	-rw-r--r--
help-mode.elc	19.38 KB	-rw-r--r--
help.elc	40.91 KB	-rw-r--r--
hex-util.elc	1.48 KB	-rw-r--r--
hexl.elc	32.06 KB	-rw-r--r--
hi-lock.elc	23.27 KB	-rw-r--r--
hilit-chg.elc	28.02 KB	-rw-r--r--
hippie-exp.elc	23.39 KB	-rw-r--r--
hl-line.elc	7.71 KB	-rw-r--r--
ibuf-ext.elc	54.62 KB	-rw-r--r--
ibuf-macs.elc	11.65 KB	-rw-r--r--
ibuffer.elc	91.96 KB	-rw-r--r--
icomplete.elc	10.36 KB	-rw-r--r--
ido.elc	110.93 KB	-rw-r--r--
ielm.elc	17.67 KB	-rw-r--r--
iimage.elc	4.06 KB	-rw-r--r--
image-dired.elc	82.24 KB	-rw-r--r--
image-file.elc	6.11 KB	-rw-r--r--
image-mode.elc	14.54 KB	-rw-r--r--
image.elc	17.09 KB	-rw-r--r--
imenu.elc	24.8 KB	-rw-r--r--
indent.elc	17 KB	-rw-r--r--
info-look.elc	26.13 KB	-rw-r--r--
info-xref.elc	7.04 KB	-rw-r--r--
info.elc	119.11 KB	-rw-r--r--
informat.elc	9.69 KB	-rw-r--r--
isearch.elc	76.23 KB	-rw-r--r--
isearchb.elc	4.92 KB	-rw-r--r--
iswitchb.elc	32.11 KB	-rw-r--r--
jit-lock.elc	17.93 KB	-rw-r--r--
jka-cmpr-hook.elc	11.67 KB	-rw-r--r--
jka-compr.elc	12.64 KB	-rw-r--r--
json.elc	13.04 KB	-rw-r--r--
kermit.elc	2.96 KB	-rw-r--r--
kmacro.elc	31.07 KB	-rw-r--r--
ldefs-boot.el	1.17 MB	-rw-r--r--
ledit.elc	4.74 KB	-rw-r--r--
linum.elc	9.56 KB	-rw-r--r--
loaddefs.el	1.17 MB	-rw-r--r--
loadhist.elc	8.65 KB	-rw-r--r--
loadup.el	12.67 KB	-rw-r--r--
locate.elc	17.81 KB	-rw-r--r--
log-edit.elc	24.93 KB	-rw-r--r--
log-view.elc	14.06 KB	-rw-r--r--
longlines.elc	14.94 KB	-rw-r--r--
lpr.elc	8.61 KB	-rw-r--r--
ls-lisp.elc	17.35 KB	-rw-r--r--
macros.elc	6.99 KB	-rw-r--r--
makesum.elc	2.16 KB	-rw-r--r--
man.elc	40.03 KB	-rw-r--r--
master.elc	4.52 KB	-rw-r--r--
mb-depth.elc	3.12 KB	-rw-r--r--
md4.elc	8.14 KB	-rw-r--r--
menu-bar.elc	67.01 KB	-rw-r--r--
midnight.elc	8.92 KB	-rw-r--r--
minibuf-eldef.elc	5.15 KB	-rw-r--r--
minibuffer.elc	42.75 KB	-rw-r--r--
misc.elc	3.67 KB	-rw-r--r--
misearch.elc	8.96 KB	-rw-r--r--
mouse-copy.elc	4.07 KB	-rw-r--r--
mouse-drag.elc	7.33 KB	-rw-r--r--
mouse-sel.elc	20.93 KB	-rw-r--r--
mouse.elc	60.03 KB	-rw-r--r--
msb.elc	27.27 KB	-rw-r--r--
mwheel.elc	9.41 KB	-rw-r--r--
newcomment.elc	32.76 KB	-rw-r--r--
novice.elc	4.75 KB	-rw-r--r--
outline.elc	34.54 KB	-rw-r--r--
paren.elc	6.43 KB	-rw-r--r--
password-cache.elc	3.58 KB	-rw-r--r--
patcomp.el	775 B	-rw-r--r--
paths.el	7.28 KB	-rw-r--r--
pcmpl-cvs.elc	6 KB	-rw-r--r--
pcmpl-gnu.elc	8.21 KB	-rw-r--r--
pcmpl-linux.elc	3.17 KB	-rw-r--r--
pcmpl-rpm.elc	7.5 KB	-rw-r--r--
pcmpl-unix.elc	5.44 KB	-rw-r--r--
pcomplete.elc	34.1 KB	-rw-r--r--
pcvs-defs.elc	16.27 KB	-rw-r--r--
pcvs-info.elc	25.83 KB	-rw-r--r--
pcvs-parse.elc	15.34 KB	-rw-r--r--
pcvs-util.elc	26.8 KB	-rw-r--r--
pcvs.elc	85.52 KB	-rw-r--r--
pgg-def.elc	2.78 KB	-rw-r--r--
pgg-gpg.elc	13.09 KB	-rw-r--r--
pgg-parse.elc	13.45 KB	-rw-r--r--
pgg-pgp.elc	7.64 KB	-rw-r--r--
pgg-pgp5.elc	7.68 KB	-rw-r--r--
pgg.elc	18.01 KB	-rw-r--r--
printing.elc	157.56 KB	-rw-r--r--
proced.elc	57.95 KB	-rw-r--r--
ps-bdf.elc	13.34 KB	-rw-r--r--
ps-def.elc	3.09 KB	-rw-r--r--
ps-mule.elc	36.17 KB	-rw-r--r--
ps-print.elc	145.59 KB	-rw-r--r--
ps-samp.elc	5.5 KB	-rw-r--r--
recentf.elc	49.04 KB	-rw-r--r--
rect.elc	10.79 KB	-rw-r--r--
register.elc	10.69 KB	-rw-r--r--
repeat.elc	6.05 KB	-rw-r--r--
replace.elc	55.02 KB	-rw-r--r--
reposition.elc	2.88 KB	-rw-r--r--
reveal.elc	6.61 KB	-rw-r--r--
rfn-eshadow.elc	7.12 KB	-rw-r--r--
rot13.elc	2.6 KB	-rw-r--r--
ruler-mode.elc	22.48 KB	-rw-r--r--
s-region.elc	3.3 KB	-rw-r--r--
savehist.elc	10.57 KB	-rw-r--r--
saveplace.elc	7.51 KB	-rw-r--r--
sb-image.elc	2.51 KB	-rw-r--r--
scroll-all.elc	4.05 KB	-rw-r--r--
scroll-bar.elc	11.47 KB	-rw-r--r--
scroll-lock.elc	4.64 KB	-rw-r--r--
select.elc	11.8 KB	-rw-r--r--
server.elc	39.79 KB	-rw-r--r--
ses.elc	87.39 KB	-rw-r--r--
sha1.elc	8 KB	-rw-r--r--
shadowfile.elc	22.61 KB	-rw-r--r--
shell.elc	34.08 KB	-rw-r--r--
simple.elc	196.35 KB	-rw-r--r--
skeleton.elc	15.78 KB	-rw-r--r--
smerge-mode.elc	33.61 KB	-rw-r--r--
sort.elc	12.94 KB	-rw-r--r--
soundex.elc	1.34 KB	-rw-r--r--
speedbar.elc	115.06 KB	-rw-r--r--
startup.elc	60.78 KB	-rw-r--r--
strokes.elc	44.11 KB	-rw-r--r--
subdirs.el	426 B	-rw-r--r--
subr.elc	113.48 KB	-rw-r--r--
t-mouse.elc	3.38 KB	-rw-r--r--
tabify.elc	2 KB	-rw-r--r--
talk.elc	3.19 KB	-rw-r--r--
tar-mode.elc	52.24 KB	-rw-r--r--
tempo.elc	18.63 KB	-rw-r--r--
term.elc	99.67 KB	-rw-r--r--
terminal.elc	31.36 KB	-rw-r--r--
thingatpt.elc	10.84 KB	-rw-r--r--
thumbs.elc	26.23 KB	-rw-r--r--
time-stamp.elc	21.03 KB	-rw-r--r--
time.elc	18.2 KB	-rw-r--r--
timezone.elc	10.99 KB	-rw-r--r--
tmm.elc	13.9 KB	-rw-r--r--
tool-bar.elc	9.69 KB	-rw-r--r--
tooltip.elc	12.35 KB	-rw-r--r--
tree-widget.elc	20.87 KB	-rw-r--r--
tutorial.elc	21.41 KB	-rw-r--r--
type-break.elc	35.61 KB	-rw-r--r--
uniquify.elc	19.91 KB	-rw-r--r--
userlock.elc	4.69 KB	-rw-r--r--
vc-annotate.elc	22.68 KB	-rw-r--r--
vc-arch.elc	17.58 KB	-rw-r--r--
vc-bzr.elc	26.84 KB	-rw-r--r--
vc-cvs.elc	32.19 KB	-rw-r--r--
vc-dav.elc	5.3 KB	-rw-r--r--
vc-dir.elc	39.5 KB	-rw-r--r--
vc-dispatcher.elc	14.61 KB	-rw-r--r--
vc-git.elc	32.75 KB	-rw-r--r--
vc-hg.elc	25.95 KB	-rw-r--r--
vc-hooks.elc	32.75 KB	-rw-r--r--
vc-mtn.elc	10.95 KB	-rw-r--r--
vc-rcs.elc	34.99 KB	-rw-r--r--
vc-sccs.elc	13.24 KB	-rw-r--r--
vc-svn.elc	20.57 KB	-rw-r--r--
vc.elc	59.4 KB	-rw-r--r--
vcursor.elc	23.44 KB	-rw-r--r--
version.el	3.37 KB	-rw-r--r--
view.elc	35.96 KB	-rw-r--r--
vt-control.elc	2.06 KB	-rw-r--r--
vt100-led.elc	1.53 KB	-rw-r--r--
w32-fns.elc	15.82 KB	-rw-r--r--
w32-vars.elc	5.53 KB	-rw-r--r--
wdired.elc	21.69 KB	-rw-r--r--
whitespace.elc	59.83 KB	-rw-r--r--
wid-browse.elc	7.89 KB	-rw-r--r--
wid-edit.elc	104.76 KB	-rw-r--r--
widget.elc	1.37 KB	-rw-r--r--
windmove.elc	9.57 KB	-rw-r--r--
window.elc	57.4 KB	-rw-r--r--
winner.elc	11.61 KB	-rw-r--r--
woman.elc	107.73 KB	-rw-r--r--
x-dnd.elc	19.35 KB	-rw-r--r--
xml.elc	18.38 KB	-rw-r--r--
xt-mouse.elc	7.43 KB	-rw-r--r--

Code Editor : tmm.elc

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

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

(byte-code "\301\302!\210\303\304\305\306\307\310\311\312&\210\313B\314\313!\204�\315\313\305\"\210\316B\314\316!\204-�\315\316\305\"\210\305\207" [current-load-list require electric custom-declare-group tmm nil "Text mode access to menu-bar." :prefix "tmm-" :group menu tmm-old-mb-map default-boundp set-default tmm-c-prompt] 8)
#@252 Text-mode emulation of looking and choosing from a menubar.
See the documentation for `tmm-prompt'.
X-POSITION, if non-nil, specifies a horizontal position within the menu bar;
we make that menu bar item (the one at that position) the default choice.
(defalias 'tmm-menubar #[(&optional x-position) "\306\307!\210\310\311!\312\n\211\203(�@\211	\236\313\314
	\"
C\"*A\211\204�)\203\240�	\315\312\211\211\211\203\234�X\203\234�@\211:\203\223�
A:\203\223�
A@;\203d�
A@\202\203�\316
8;\205\203�\317\320
\233\321\"\211\205|�\322!??\205\203�\316
8\211\203\223�\323G\324#A\211\204@�
@-\325	\312#*\207" [menu-bar-item menu-bar menu-bar-final-items list item this-one run-hooks menu-bar-update-hook tmm-get-keybind [menu-bar] nil append delq 0 2 plist-get 4 :visible eval + 1 tmm-prompt x-position visible name column tail] 6 (#$ . 934) nil])
#@225 Text-mode emulation of looking and choosing from a menubar.
This command is used when you click the mouse in the menubar
on a console which has no window system but does have a mouse.
See the documentation for `tmm-prompt'.
(defalias 'tmm-menubar-mouse #[(event) "\302\211:\203�A@\202�\303 `\304\305F)\306	8)@!\207" [event position tmm-menubar selected-window (0 . 0) 0 2] 6 (#$ . 1821) "e"])
#@199 String to insert between shortcut and menu item.
If nil, there will be no shortcuts. It should not consist only of spaces,
or else the correct item might not be found in the `*Completions*' buffer.
(custom-declare-variable 'tmm-mid-prompt '"==>" '(#$ . 2227) :type 'string :group 'tmm)
#@34 A place to store minibuffer map.
(defvar tmm-mb-map nil (#$ . 2519))
#@159 Help text to insert on the top of the completion buffer.
To save space, you can set this to nil,
in which case the standard introduction text is deleted too.
(custom-declare-variable 'tmm-completion-prompt '"Press PageUp key to reach this buffer from the minibuffer.\nAlternatively, you can use Up/Down keys (or your History keys) to change\nthe item in the minibuffer, and press RET when you are done, or press the\nmarked letters to pick up your choice.  Type C-g or ESC ESC ESC to cancel.\n" '(#$ . 2595) :type '(choice string (const nil)) :group 'tmm)
#@149 What letters to use as menu shortcuts.
Must be either one of the symbols `downcase' or `upcase',
or else a list of the two in the order you prefer.
(custom-declare-variable 'tmm-shortcut-style ''(downcase upcase) '(#$ . 3158) :type '(choice (const downcase) (const upcase) (repeat (choice (const downcase) (const upcase)))) :group 'tmm)
#@167 How many successive words to try for shortcuts, nil means all.
If you use only one of `downcase' or `upcase' for `tmm-shortcut-style',
specify nil for this variable.
(custom-declare-variable 'tmm-shortcut-words '2 '(#$ . 3502) :type '(choice integer (const nil)) :group 'tmm)
(custom-declare-face 'tmm-inactive '((t :inherit shadow)) "Face used for inactive menu items." :group 'tmm)
#@546 Text-mode emulation of calling the bindings in keymap.
Creates a text-mode menu of possible choices.  You can access the elements
in the menu in two ways:
   *)  via history mechanism from minibuffer;
   *)  Or via completion-buffer that is automatically shown.
The last alternative is currently a hack, you cannot use mouse reliably.

MENU is like the MENU argument to `x-popup-menu': either a
keymap or an alist of alists.
DEFAULT-ITEM, if non-nil, specifies an initial default choice.
Its value should be an event that has a binding in MENU.
(defalias 'tmm-prompt #[(menu &optional in-popup default-item) "\306\307\211\211\211\211\211\211\211\211\211\211\310!?1234&567\311\312!\210\313\314\"\210	\203B�6G\315U\203B�6@A\202b6\204K�\316\317!\2106\203\32089\203^�\3216!6:\203\265�\307;\211<\203\264�<@\242:=\204\264�<@:\203\253�<@A\242;\204\246�<@A\242\322=\203\253�\323\324<@\233\325\"\211;\203\246�\326;!\203\253�8T8<A\211<\204m�*\327\3309!P=\331\332\307\333\3346\"\"!&)&G4\335&\211\211\211$&\3364\3158#&82\337\340\341\"\210:\203\371�868@5\202\212\342\216\3437\344P6\307\345\307\3464\347_8ZB&5*)\35056\"A\211\204I5G2GV\203I5\3202GO2\230\203I52G\307O5\35056\"A\n\204b5\203b\35156\"5\35056\"A\n@\nA>\203q\n\202\255	\203|\352\n\345\"\202\255\310\n!\203\233\n9\203\213\353\n!\307\354\355\217\210\307\356\357\217\210\352\n!\202\255\n\205\255\203\254?\360\n!\202\255\n.
\207" [menu not-menu choice chosen-string tmm-short-cuts tmm-old-comp-map "Menu bar" nil keymapp run-hooks activate-menubar-hook mapc #[(elt) ";\203	�\211\207<\205�\303\n\"\207" [elt gl-str not-menu tmm-get-keymap] 3] 1 error "Empty menu reached" 0 tmm-add-shortcuts menu-item plist-get 4 :visible eval "^." regexp-quote reverse delq mapcar #[(elt) "\302	@\"\205\n�	@\207" [prompt elt string-match] 3] append - add-hook minibuffer-setup-hook tmm-add-prompt ((byte-code "\301\302\303\"\210\304\305!\203�r\305q\210\306!\210\307p!\210)\301\207" [tmm-old-comp-map remove-hook minibuffer-setup-hook tmm-add-prompt get-buffer "*Completions*" use-local-map bury-buffer] 3)) completing-read " (up/down to change, PgUp to menu): " t history 2 assoc try-completion tmm-prompt indirect-function (byte-code "\300\301!\207" [require mouse] 2) ((error)) (x-popup-menu nil choice) ((error)) call-interactively tmm-old-mb-map tmm-c-prompt tmm-table-undef history-len out tmm-km-list gl-str index-of-default tmm-mid-prompt default-item visible tail prompt in-popup last-command-event] 15 (#$ . 3893)])
#@216 Adds shortcuts to cars of elements of the list.
Takes a list of lists with a string as car, returns list with
shortcuts added to these cars.
Stores a list of all the shortcuts in the free variable `tmm-short-cuts'.
(defalias 'tmm-add-shortcuts #[(list) "\302\303\304\305	!\")\207" [tmm-next-shortcut-digit list 48 mapcar tmm-add-one-shortcut reverse] 4 (#$ . 6470)])
(defalias 'tmm-add-one-shortcut #[(elt) "\211AA)\306=\203�\307\310\nG\311\"@QAB\207@\312\313\"\314\211\315\316\317\215\210\2038�B\203F�\320!\nP\202L�\310\nGT\321\"PA-B\207" [elt x tmm-mid-prompt str paren pos ignore " " make-string 45 string-match "(" 0 nil done (byte-code "\203\n�	W\203g�\306\307\n#\211\203g�\f\203�\fV\204g�\310U\204-�\nSH\311U\204^�
<\2036�
\2028�
C\211\203]�@\nH!\211>\204T�\312\313\"\210A\211\204>�)	T\310\225\202��\314X\203\210�T>\204g�\312\313\"\210\202g�\315\211\207" [tmm-shortcut-words word str pos paren tmm-shortcut-style string-match "\\w+" 0 46 throw done 57 nil shortcut-style char tmm-short-cuts tmm-next-shortcut-digit] 5) char-to-string 32 word char tmm-short-cuts] 5])
(put 'tmm-add-one-shortcut 'byte-optimizer 'byte-compile-inline-expand)
(defalias 'tmm-define-keys #[(minibuffer) "\303 \304\305\"\210\306\307	\"\210\n\203/�\310\311\312#\210\310\313\312#\210\310\314\312#\210\310\315\316#\210\310\317\320#\210\321 \322\323\321 \"!\210)\207" [map tmm-short-cuts minibuffer make-sparse-keymap suppress-keymap t mapc #[(c) "<\203
�\303	\304\n!\305#\207\303	\304\n\227!\305#\210\303	\304\n\226!\305#\207" [tmm-shortcut-style map c define-key char-to-string tmm-shortcut] 4] define-key [pageup] tmm-goto-completions [prior] "v" "" next-history-element "" previous-history-element current-local-map use-local-map append] 5])
(defalias 'tmm-completion-delete-prompt #[nil "q\210eb\210`\301\302!|\207" [standard-output search-forward "Possible completions are:\n"] 3])
#@58 Remove the mouse-face property from inactive menu items.
(defalias 'tmm-remove-inactive-mouse-face #[nil "\304\305\306G\307\"P\310\212eb\210m\2041�\311`\312\"\313\n!\203+�\314`	\315#\210\316`	\317#\210	b\210\202�)\320\310!+\207" [tmm-mid-prompt next inactive-string inhibit-read-only t " " make-string 45 nil next-single-char-property-change mouse-face looking-at remove-text-properties (mouse-face) add-text-properties (face tmm-inactive) set-buffer-modified-p] 5 (#$ . 8428)])
(defalias 'tmm-add-prompt #[nil "\306\307\310\"\210\311\312\313\314\315$\210\204�\316\317!\210\320 \321\315!\322\213\210\320 \323\324\325 \"r\326\216\327\330!\210\331\332!\210r\332q\210\321\314!-c)\207" [tmm-c-prompt win tmm-old-mb-map save-selected-window-alist save-selected-window-window tmm-old-comp-map remove-hook minibuffer-setup-hook tmm-add-prompt add-hook minibuffer-exit-hook tmm-delete-map nil t error "No active menu entries" selected-window tmm-define-keys ((byte-code "\304\305\"\n\204�\306\307\310\311#\210\312\216\313\220\314	!\221\210*\313q\210\315 \210\n\203,�\316eb\210\nc\210)\316\207" [minibuffer-completion-table completions tmm-completion-prompt buffer-read-only mapcar car add-hook completion-setup-hook tmm-completion-delete-prompt append ((byte-code "\300\301\302\"\207" [remove-hook completion-setup-hook tmm-completion-delete-prompt] 3)) "*Completions*" display-completion-list tmm-remove-inactive-mouse-face nil] 4)) mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203(�\n@\305	@!\203!�\306	A!\203!�\307	@	A\310#\210\nA\211\204�*\306!\2034�\311\310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) other-window 1 Electric-pop-up-window "*Completions*"] 5])
(defalias 'tmm-delete-map #[nil "\301\302\303\304#\210\205
�\305!\207" [tmm-old-mb-map remove-hook minibuffer-exit-hook tmm-delete-map t use-local-map] 4])
#@42 Choose the shortcut that the user typed.
(defalias 'tmm-shortcut #[nil "\3069\203
�\n!\n\f>\205;�\307 \310\232\203+�eb\210\311\312\313\n!
Q!\210\314 \202;�\315 d|\210\316\317\"\210	c\210\320 *\207" [last-command-event s c tmm-shortcut-style tmm-short-cuts tmm-mid-prompt nil buffer-name "*Completions*" re-search-forward "\$^\\|[ 	]\$" char-to-string choose-completion minibuffer-prompt-end mapc #[(elt) "@\304	GT@G^O\305\n!	P\230\205�@\211\207" [elt tmm-mid-prompt c s 0 char-to-string] 4] exit-minibuffer tmm-km-list] 4 (#$ . 10461) nil])
(defalias 'tmm-goto-completions #[nil "\302 \211d{d|\210)\303\304!\210\305	!\210\306	!\207" [prompt-end tmm-c-prompt minibuffer-prompt-end switch-to-buffer-other-window "*Completions*" search-forward search-backward] 3 nil nil])
#@383 Prepends (DOCSTRING EVENT BINDING) to free variable `tmm-km-list'.
The values are deduced from the argument ELT, that should be an
element of keymap, an `x-popup-menu' argument, or an element of
`x-popup-menu' argument (when IN-X-MENU is not-nil).
This function adds the element only if it is not already present.
It uses the free variable `tmm-table-undef' to keep undefined keys.
(defalias 'tmm-get-keymap #[(elt &optional in-x-menu) "\306\211\211\211\211\211\211@A\211\307=\203)�	\306BB\211\202?\310	\"\204\355<\203C�\311!\204I�@\312=\202F�\313!\203O�\202\355\243<\203d�\311\243!\204k�\243@\312=\202h�\313\243!\203|�A@;\203\355@\202\355\243\243<\203\224�\311\243\243!\204\234�\243\243@\312=\202\231�\313\243\243!\203\335�\211AA)@;\203\257�@\203\355\211A@)\243;\203\355\211A@)A\211\203\355\203\355P\202\355\242\314=\203d\243\243\243\211\242:\203\362�
\243\3158\316A@!\317
\320\"\211\203
\f!\317
\321\"\211\203 \316!\205\317
\322\"\211\2037\316\n!\2034\2025\323\203\355\3248:\203\355\3248A;\203\355\3248A\211\203\355\203\355P\202\355\243\243\243<\203\311\243\243\243!\204\210\243\243\243@\312=\202\205\313\243\243\243!\203\310\211AA)A@;\203\234@\203\355\211AA)@\243;\203\355AA@A\211\203\355\203\355P\202\355	;\203\355\204\330\242;\203\343	\306\202\355	\306\325B\203\374;\203\374\2039\203\326N\203\316\326N!\203\202\323\205?\205?\310\"\206?	BBB\211.\207" [elt event enable visible filter plist nil undefined assoc keymapp lambda fboundp menu-item 2 eval plist-get :filter :visible :enable ignore 3 keymap menu-enable cache str km tmm-table-undef x in-x-menu tmm-km-list] 9 (#$ . 11256)])
#@299 Return the current binding of KEYSEQ, merging prefix definitions.
If KEYSEQ is a prefix key that has local and global bindings,
we merge them into a single keymap which shows the proper order of the menu.
However, for the menu bar itself, the value does not take account
of `menu-bar-final-items'.
(defalias 'tmm-get-keybind #[(keyseq) "\306\211\211\211\211\307
!\310!\203�\306\206\227�\311\312\313
!\"\314
!\315\316
!A!\n\306\211\203e�@\211A\306\211\203[�@\317\242\"A\211\204F�*A\211\2046�*	A\306\211\203\206�@\317\242\"A\211\204q�*\320B\211	\nBB\321\322\f\"\210-\207" [globalbind localbind minorbind bind allbind keyseq nil key-binding keymapp mapcar cdr minor-mode-key-binding local-key-binding copy-sequence global-key-binding assq-delete-all keymap mapc #[(in) "9\203�\302!\203�K\205,�\302!\205,�\302	!\203'�	\303A!\244\211\207\303!\211\207" [in bind keymapp copy-sequence] 3] minor --dolist-tail-- item] 6 (#$ . 13096)])
(byte-code "\300\301\302\"\210\303\304!\207" [add-hook calendar-load-hook #[nil "\300\301!\207" [require cal-menu] 2] provide tmm] 3)

${this.title}

Code Editor : tmm.elc