Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
abbrevlist.elc	1.27 KB	-rw-r--r--
assoc.elc	4.12 KB	-rw-r--r--
bruce.elc	1.48 KB	-rw-r--r--
cc-compat.elc	2.75 KB	-rw-r--r--
cl-compat.elc	3.81 KB	-rw-r--r--
cl.elc	14.81 KB	-rw-r--r--
complete.elc	24.19 KB	-rw-r--r--
crisp.elc	11.09 KB	-rw-r--r--
cust-print.elc	12.32 KB	-rw-r--r--
erc-hecomplete.elc	8.6 KB	-rw-r--r--
eudcb-ph.elc	5.87 KB	-rw-r--r--
fast-lock.elc	16.69 KB	-rw-r--r--
gs.elc	3.76 KB	-rw-r--r--
gulp.elc	4.59 KB	-rw-r--r--
html2text.elc	9.77 KB	-rw-r--r--
info-edit.elc	4.45 KB	-rw-r--r--
iswitchb.elc	31.64 KB	-rw-r--r--
landmark.elc	41.62 KB	-rw-r--r--
lazy-lock.elc	24.11 KB	-rw-r--r--
ledit.elc	4.44 KB	-rw-r--r--
levents.elc	9.27 KB	-rw-r--r--
lmenu.elc	10.96 KB	-rw-r--r--
longlines.elc	15.21 KB	-rw-r--r--
lucid.elc	5.2 KB	-rw-r--r--
mailpost.elc	2.11 KB	-rw-r--r--
mantemp.elc	3.61 KB	-rw-r--r--
meese.elc	833 B	-rw-r--r--
messcompat.el	1.73 KB	-rw-r--r--
mouse-sel.elc	20.17 KB	-rw-r--r--
old-emacs-lock.elc	2.59 KB	-rw-r--r--
old-whitespace.elc	22.78 KB	-rw-r--r--
otodo-mode.elc	23.86 KB	-rw-r--r--
patcomp.elc	988 B	-rw-r--r--
pc-mode.elc	1.3 KB	-rw-r--r--
pc-select.elc	12.86 KB	-rw-r--r--
pgg-def.elc	2.24 KB	-rw-r--r--
pgg-gpg.elc	12.72 KB	-rw-r--r--
pgg-parse.elc	12.87 KB	-rw-r--r--
pgg-pgp.elc	7.42 KB	-rw-r--r--
pgg-pgp5.elc	7.34 KB	-rw-r--r--
pgg.elc	18.98 KB	-rw-r--r--
rcompile.elc	3.01 KB	-rw-r--r--
s-region.elc	3.08 KB	-rw-r--r--
sregex.elc	12.15 KB	-rw-r--r--
starttls.elc	6.03 KB	-rw-r--r--
sup-mouse.elc	3.98 KB	-rw-r--r--
terminal.elc	30.36 KB	-rw-r--r--
tls.elc	7.29 KB	-rw-r--r--
tpu-edt.elc	59.59 KB	-rw-r--r--
tpu-extras.elc	11.88 KB	-rw-r--r--
tpu-mapper.elc	10.33 KB	-rw-r--r--
url-ns.elc	2.16 KB	-rw-r--r--
vc-arch.elc	17.65 KB	-rw-r--r--
vi.elc	47.89 KB	-rw-r--r--
vip.elc	76.49 KB	-rw-r--r--
ws-mode.elc	24.11 KB	-rw-r--r--
yow.elc	2.14 KB	-rw-r--r--

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

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

#@82 Non-nil means mouse hits select new window, then execute.
Otherwise just select.
(custom-declare-variable 'sup-mouse-fast-select-window nil '(#$ . 408) :type 'boolean :group 'mouse)
(defconst mouse-left 0)
(defconst mouse-center 1)
(defconst mouse-right 2)
(defconst mouse-2left 4)
(defconst mouse-2center 5)
(defconst mouse-2right 6)
(defconst mouse-3left 8)
(defconst mouse-3center 9)
(defconst mouse-3right 10)
#@601 This function is called directly by the mouse, it parses and
executes the mouse commands.

on mode line		    on "scroll bar"	in minibuffer
 L scroll-up		    line to top		execute-extended-command
 C proportional goto-char   line to middle	mouse-help
 R scroll-down		    line to bottom	eval-expression
(defalias 'sup-mouse-report #[nil "\306\307!\306\307!\306\310!\311	\n\"\312!\313 \n\314 S=\211'?\205'�
=(\n\315\f8S=)	\316\f8SY*	\f@Z\n\fA@Z)\203\205�\317!\210+U\203Z�\320 \210\202�,U\203g�\321 \210\202�-U\203�	deZ_\322 S\245b\210\323 \210\324 \210\317
!\202\332*\203\307�\317!\210\320+U\203\232�\n\202\277�,U\203\252�\n\316\325 Z\\\202\277�-U\203\276�\326\316\n\211\325 [$\316\245\202\277�\327!\210\317
!\202\332(\203q+U\203\332�\330	\n\"\202\332.U\203\354�\330	\n\"\210\331\332!\202\332/U\203	\330	\n\"\210\212\333`\332v\210`\"\210)\334\2110\202\332,U\203\335 \210\330	\n\"\210\336 \202\3321U\2034\335 \210\330	\n\"\210\337\340 `\"\202\3322U\203P\335 \210\330	\n\"\210\333\340 `\"\210\334\2110\202\332-U\203d\330	\n\"\210\334\2110 \202\3323U\205\332\341\332!\202\332'\203\235,U\203\203\342\343!\202\332+U\203\220\342\344!\202\332-U\205\332\345\346!\202\332\317!\2104?\206\332+U\203\265\330	\n\"\202\332,U\203\311\335 \210\330	\n\"\210\336 \202\332-U\205\332\330	\n\"\210\334\2110 .\n\207" [buttons x y window edges old-window sup-get-tty-num 59 99 sup-pos-to-window window-edges selected-window frame-height 3 2 select-window scroll-up scroll-down window-width beginning-of-line what-cursor-position window-height + 0 sup-move-point-to-x-y kill-word 1 copy-region-as-kill yank push-mark exchange-point-and-mark kill-region mark yank-pop call-interactively eval-expression execute-extended-command describe-function sup-mouse-report in-minibuf-p same-window-p in-mode-line-p in-scrollbar-p mouse-left mouse-right mouse-center mouse-2left mouse-3left this-command mouse-2right mouse-3right mouse-2center sup-mouse-fast-select-window] 7 (#$ . 829) nil])
#@133 Read from terminal until TERM-CHAR is read, and return intervening number.
Upon non-numeric not matching TERM-CHAR signal an error.
(defalias 'sup-get-tty-num #[(term-char) "\303\304 \305Y\203 �\306X\203 �	\307_\305Z\\\304 \211\202�\n=\204*�\310\311!\210	*\207" [char num term-char 0 read-char 48 57 10 error "Invalid data format in mouse command"] 4 (#$ . 3189)])
#@95 Position cursor in window coordinates.
X and Y are 0-based character positions in the window.
(defalias 'sup-move-point-to-x-y #[(x y) "\302!\210\303	!\207" [y x move-to-window-line move-to-column] 2 (#$ . 3569)])
#@103 Find window corresponding to frame coordinates.
X and Y are 0-based character positions on the frame.
(defalias 'sup-pos-to-window #[(x y) "\300\301!\207" [get-window-with-predicate #[(w) "\303	B\n\"\207" [x y w coordinates-in-window-p] 3]] 2 (#$ . 3791)])
(provide 'sup-mouse)

${this.title}

Code Editor : sup-mouse.elc