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 : cursor-sensor.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.

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

#@175 When non-nil, suspend `cursor-sensor-mode' and `cursor-intangible-mode'.
By convention, this is a list of symbols where each symbol stands for the
"cause" of the suspension.
(defvar cursor-sensor-inhibit nil (#$ . 409))
#@12

(fn POS)
(defalias 'cursor-sensor--intangible-p #[257 "\300\301\"\211\2033�\302\211\303\301\"\211\262\205)�eV\205�\303S\301\"\211\262\205)�=??\205.�\266\202\2024�\211\207" [get-pos-property cursor-intangible nil get-char-property] 7 (#$ . 635)])
#@46

(fn CURPOS WINDOW &optional SECOND-CHANCE)
(defalias 'cursor-sensor-tangible-pos #[770 "\300!\205\205�\301\302\"\211\250\203�\211W\204�e=\203?�dW\203`�\303\304\"\2032�\305\304\306d$\2024�T\262\300!\204�\202`�eV\203`�\303S\304\"\203V�\307\304\306e$\202X�S\262\300!\204?�e=\204l�d=\203r�\300!\204v�\202\203�\203~�\202\203�\310\311#\262\207" [cursor-sensor--intangible-p window-parameter cursor-intangible--last-point get-char-property cursor-intangible next-single-char-property-change nil previous-single-char-property-change cursor-sensor-tangible-pos second-chance] 10 (#$ . 899)])
#@15

(fn WINDOW)
(defalias 'cursor-sensor-move-to-tangible #[257 "\300!\301\"\211\203�\302\"\210\303\304\206�#\207" [window-point cursor-sensor-tangible-pos set-window-point set-window-parameter cursor-intangible--last-point] 7 (#$ . 1519)])
#@15

(fn WINDOW)
(defalias 'cursor-sensor--move-to-tangible #[257 "?\205�\301!\207" [cursor-sensor-inhibit cursor-sensor-move-to-tangible] 3 (#$ . 1774)])
#@113 Non-nil if Cursor-Intangible mode is enabled.
Use the command `cursor-intangible-mode' to change this variable.
(defvar cursor-intangible-mode nil (#$ . 1936))
(make-variable-buffer-local 'cursor-intangible-mode)
#@333 Keep cursor outside of any `cursor-intangible' text property.

If called interactively, enable Cursor-Intangible mode if ARG is
positive, and disable it if ARG is zero or negative.  If called from
Lisp, also enable the mode if ARG is omitted or nil, and toggle it if
ARG is `toggle'; disable the mode otherwise.

(fn &optional ARG)
(defalias 'cursor-intangible-mode #[256 "\301 \302=\203
�?\202�\303!\304V\211\203!�\305\306\307\310\311$\210\202'�\312\306\307\311#\210\313\314\2031�\315\2022�\316\"\210\317\320!\203V�\301 \203F�\211\301 \232\203V�\321\322\323\203Q�\324\202R�\325#\266\210\326 \210\207" [cursor-intangible-mode current-message toggle prefix-numeric-value 0 add-hook pre-redisplay-functions cursor-sensor--move-to-tangible nil t remove-hook run-hooks cursor-intangible-mode-hook cursor-intangible-mode-on-hook cursor-intangible-mode-off-hook called-interactively-p any " in current buffer" message "Cursor-Intangible mode %sabled%s" "en" "dis" force-mode-line-update] 8 (#$ . 2156) (byte-code "\206�\301C\207" [current-prefix-arg toggle] 1)])
(defvar cursor-intangible-mode-hook nil)
(byte-code "\301\302N\204\f�\303\301\302\304#\210\305\306\307\310\300!\205�\307\211%\207" [cursor-intangible-mode-map cursor-intangible-mode-hook variable-documentation put "Hook run after entering or leaving `cursor-intangible-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" add-minor-mode cursor-intangible-mode nil boundp] 6)
#@25

(fn &optional WINDOW)
(defalias 'cursor-sensor--detect #[256 "r\301!q\210?\205\332�\302!\303\304\"\206!�eX?\205!�\303S\304\"\305\306\"\211@\211\2031�\307!\2062�e\211^]\203I�\310!p=\204I�\311\241\210\204R�A\203\272�A=\203d�\312\304\311$=\204\272�\313\314 A\211\203\217�\211@\211\n>\203\201�#\203\210�\211\315#\210A\266\202\202j�\210\211\203\270�\211@\211	A>\203\252�#\203\261�\211\316#\210A\266\202\202\222�\266\203\314�@\311\223\210\241\202\330�\317\306\320\n!	B#\266\207)\207" [cursor-sensor-inhibit window-buffer window-point get-char-property cursor-sensor-functions window-parameter cursor-sensor--last-state marker-position marker-buffer nil next-single-char-property-change #[771 "\300W\203 �\301\302\300$\262\303\302\">\204�\304\262\202�\207" [nil next-single-char-property-change cursor-sensor-functions get-char-property t] 10 "Non-nil if F is missing somewhere between START and END.\n\n(fn START END F)"] selected-window left entered set-window-parameter copy-marker] 16 (#$ . 3690)])
#@105 Non-nil if Cursor-Sensor mode is enabled.
Use the command `cursor-sensor-mode' to change this variable.
(defvar cursor-sensor-mode nil (#$ . 4767))
(make-variable-buffer-local 'cursor-sensor-mode)
#@689 Handle the `cursor-sensor-functions' text property.
This property should hold a list of functions which react to the motion
of the cursor.  They're called with three arguments (WINDOW OLDPOS DIR)
where WINDOW is the affected window, OLDPOS is the last known position of
the cursor and DIR can be `entered' or `left' depending on whether the cursor
is entering the area covered by the text-property property or leaving it.

If called interactively, enable Cursor-Sensor mode if ARG is positive,
and disable it if ARG is zero or negative.  If called from Lisp, also
enable the mode if ARG is omitted or nil, and toggle it if ARG is
`toggle'; disable the mode otherwise.

(fn &optional ARG)
(defalias 'cursor-sensor-mode #[256 "\301 \302=\203
�?\202�\303!\304V\211\203(�\305\306\307\310\311$\210\305\312\307\310\311$\210\2024�\313\306\307\311#\210\313\312\307\311#\210\314\315\203>�\316\202?�\317\"\210\320\321!\203c�\301 \203S�\211\301 \232\203c�\322\323\324\203^�\325\202_�\326#\266\210\327 \210\207" [cursor-sensor-mode current-message toggle prefix-numeric-value 0 add-hook post-command-hook cursor-sensor--detect nil t pre-redisplay-functions remove-hook run-hooks cursor-sensor-mode-hook cursor-sensor-mode-on-hook cursor-sensor-mode-off-hook called-interactively-p any " in current buffer" message "Cursor-Sensor mode %sabled%s" "en" "dis" force-mode-line-update] 8 (#$ . 4971) (byte-code "\206�\301C\207" [current-prefix-arg toggle] 1)])
(defvar cursor-sensor-mode-hook nil)
(byte-code "\301\302N\204\f�\303\301\302\304#\210\305\306\307\310\300!\205�\307\211%\210\311\312!\207" [cursor-sensor-mode-map cursor-sensor-mode-hook variable-documentation put "Hook run after entering or leaving `cursor-sensor-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" add-minor-mode cursor-sensor-mode nil boundp provide cursor-sensor] 6)

${this.title}

Code Editor : cursor-sensor.elc