Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
calc	[ DIR ]	drwxr-xr-x
calendar	[ DIR ]	drwxr-xr-x
cedet	[ 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
image	[ DIR ]	drwxr-xr-x
international	[ DIR ]	drwxr-xr-x
language	[ DIR ]	drwxr-xr-x
leim	[ 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
vc	[ DIR ]	drwxr-xr-x
COPYING	34.32 KB	-rw-r--r--
README	537 B	-rw-r--r--
abbrev.elc	34.55 KB	-rw-r--r--
align.elc	39.88 KB	-rw-r--r--
allout-widgets.elc	62.37 KB	-rw-r--r--
allout.elc	203.33 KB	-rw-r--r--
ansi-color.elc	17.12 KB	-rw-r--r--
apropos.elc	37.42 KB	-rw-r--r--
arc-mode.elc	58.06 KB	-rw-r--r--
array.elc	27.07 KB	-rw-r--r--
auth-source-pass.elc	11.68 KB	-rw-r--r--
auth-source.elc	64.32 KB	-rw-r--r--
autoarg.elc	6.63 KB	-rw-r--r--
autoinsert.elc	13.41 KB	-rw-r--r--
autorevert.elc	30.71 KB	-rw-r--r--
avoid.elc	11.62 KB	-rw-r--r--
battery.elc	24.42 KB	-rw-r--r--
bindings.elc	42.76 KB	-rw-r--r--
bookmark.elc	77.09 KB	-rw-r--r--
bs.elc	49.32 KB	-rw-r--r--
buff-menu.elc	27.02 KB	-rw-r--r--
button.elc	14.97 KB	-rw-r--r--
calculator.elc	53.9 KB	-rw-r--r--
case-table.elc	4.99 KB	-rw-r--r--
cdl.elc	1.07 KB	-rw-r--r--
char-fold.elc	311.81 KB	-rw-r--r--
chistory.elc	8.16 KB	-rw-r--r--
cmuscheme.elc	18.07 KB	-rw-r--r--
color.elc	12.83 KB	-rw-r--r--
comint.elc	114.46 KB	-rw-r--r--
completion.elc	41.12 KB	-rw-r--r--
composite.elc	27.94 KB	-rw-r--r--
cus-dep.elc	6.42 KB	-rw-r--r--
cus-edit.elc	139.04 KB	-rw-r--r--
cus-face.elc	10.54 KB	-rw-r--r--
cus-load.el	85.19 KB	-rw-r--r--
cus-start.elc	21.92 KB	-rw-r--r--
cus-theme.elc	25.05 KB	-rw-r--r--
custom.elc	47.41 KB	-rw-r--r--
dabbrev.elc	22.28 KB	-rw-r--r--
delim-col.elc	8.95 KB	-rw-r--r--
delsel.elc	9.2 KB	-rw-r--r--
descr-text.elc	26.87 KB	-rw-r--r--
desktop.elc	47.64 KB	-rw-r--r--
dframe.elc	19.92 KB	-rw-r--r--
dired-aux.elc	85.75 KB	-rw-r--r--
dired-loaddefs.el	22.29 KB	-rw-r--r--
dired-x.elc	44.53 KB	-rw-r--r--
dired.elc	127.27 KB	-rw-r--r--
dirtrack.elc	7.75 KB	-rw-r--r--
disp-table.elc	8.76 KB	-rw-r--r--
display-fill-column-indicator....	8.32 KB	-rw-r--r--
display-line-numbers.elc	8.67 KB	-rw-r--r--
dnd.elc	7.13 KB	-rw-r--r--
doc-view.elc	65.25 KB	-rw-r--r--
dom.elc	7.36 KB	-rw-r--r--
dos-fns.elc	6.14 KB	-rw-r--r--
dos-vars.elc	1.1 KB	-rw-r--r--
dos-w32.elc	11.67 KB	-rw-r--r--
double.elc	4.34 KB	-rw-r--r--
dynamic-setting.elc	2.2 KB	-rw-r--r--
ebuff-menu.elc	10.46 KB	-rw-r--r--
echistory.elc	4.75 KB	-rw-r--r--
ecomplete.elc	7.1 KB	-rw-r--r--
edmacro.elc	19.94 KB	-rw-r--r--
ehelp.elc	11.32 KB	-rw-r--r--
elec-pair.elc	21.41 KB	-rw-r--r--
electric.elc	23.69 KB	-rw-r--r--
elide-head.elc	2.65 KB	-rw-r--r--
emacs-lock.elc	9.29 KB	-rw-r--r--
env.elc	6.12 KB	-rw-r--r--
epa-dired.elc	1.62 KB	-rw-r--r--
epa-file.elc	8.65 KB	-rw-r--r--
epa-hook.elc	4.63 KB	-rw-r--r--
epa-mail.elc	9.43 KB	-rw-r--r--
epa.elc	45.25 KB	-rw-r--r--
epg-config.elc	8.97 KB	-rw-r--r--
epg.elc	166.06 KB	-rw-r--r--
expand.elc	9.07 KB	-rw-r--r--
ezimage.elc	9.65 KB	-rw-r--r--
face-remap.elc	16.58 KB	-rw-r--r--
facemenu.elc	27.89 KB	-rw-r--r--
faces.elc	90.21 KB	-rw-r--r--
ffap.elc	50.3 KB	-rw-r--r--
filecache.elc	16.69 KB	-rw-r--r--
fileloop.elc	6.62 KB	-rw-r--r--
filenotify.elc	28.49 KB	-rw-r--r--
files-x.elc	21.9 KB	-rw-r--r--
files.elc	236.95 KB	-rw-r--r--
filesets.elc	72.57 KB	-rw-r--r--
find-cmd.elc	4.9 KB	-rw-r--r--
find-dired.elc	10.41 KB	-rw-r--r--
find-file.elc	18.33 KB	-rw-r--r--
find-lisp.elc	7.66 KB	-rw-r--r--
finder-inf.el	41.27 KB	-rw-r--r--
finder.elc	14.73 KB	-rw-r--r--
flow-ctrl.elc	2.26 KB	-rw-r--r--
foldout.elc	7.25 KB	-rw-r--r--
follow.elc	40.63 KB	-rw-r--r--
font-core.elc	12.41 KB	-rw-r--r--
font-lock.elc	61.63 KB	-rw-r--r--
format-spec.elc	3.93 KB	-rw-r--r--
format.elc	27.56 KB	-rw-r--r--
forms.elc	35.1 KB	-rw-r--r--
frame.elc	85.94 KB	-rw-r--r--
frameset.elc	48.02 KB	-rw-r--r--
fringe.elc	10.23 KB	-rw-r--r--
generic-x.elc	40.27 KB	-rw-r--r--
help-at-pt.elc	11.15 KB	-rw-r--r--
help-fns.elc	45.35 KB	-rw-r--r--
help-macro.elc	4.25 KB	-rw-r--r--
help-mode.elc	23.89 KB	-rw-r--r--
help.elc	52.22 KB	-rw-r--r--
hex-util.elc	1.3 KB	-rw-r--r--
hexl.elc	35.39 KB	-rw-r--r--
hfy-cmap.elc	25.45 KB	-rw-r--r--
hi-lock.elc	29.38 KB	-rw-r--r--
hilit-chg.elc	28.77 KB	-rw-r--r--
hippie-exp.elc	21.52 KB	-rw-r--r--
hl-line.elc	11.23 KB	-rw-r--r--
htmlfontify-loaddefs.el	808 B	-rw-r--r--
htmlfontify.elc	67.51 KB	-rw-r--r--
ibuf-ext.elc	77.15 KB	-rw-r--r--
ibuf-macs.elc	12.47 KB	-rw-r--r--
ibuffer-loaddefs.el	12.68 KB	-rw-r--r--
ibuffer.elc	98.62 KB	-rw-r--r--
icomplete.elc	22.83 KB	-rw-r--r--
ido.elc	127.92 KB	-rw-r--r--
ielm.elc	19.2 KB	-rw-r--r--
iimage.elc	4.92 KB	-rw-r--r--
image-dired.elc	92.97 KB	-rw-r--r--
image-file.elc	6.53 KB	-rw-r--r--
image-mode.elc	42.56 KB	-rw-r--r--
image.elc	34.45 KB	-rw-r--r--
imenu.elc	24.94 KB	-rw-r--r--
indent.elc	23.63 KB	-rw-r--r--
info-look.elc	28.18 KB	-rw-r--r--
info-xref.elc	16.59 KB	-rw-r--r--
info.elc	144.48 KB	-rw-r--r--
informat.elc	9.73 KB	-rw-r--r--
isearch.elc	147.85 KB	-rw-r--r--
isearchb.elc	4.73 KB	-rw-r--r--
jit-lock.elc	23.49 KB	-rw-r--r--
jka-cmpr-hook.elc	13.07 KB	-rw-r--r--
jka-compr.elc	12.09 KB	-rw-r--r--
json.elc	22.76 KB	-rw-r--r--
jsonrpc.elc	31.65 KB	-rw-r--r--
kermit.elc	2.92 KB	-rw-r--r--
kmacro.elc	35.15 KB	-rw-r--r--
ldefs-boot.el	1.41 MB	-rw-r--r--
linum.elc	10.77 KB	-rw-r--r--
loaddefs.el	1.41 MB	-rw-r--r--
loadhist.elc	9.77 KB	-rw-r--r--
loadup.el	20.08 KB	-rw-r--r--
locate.elc	19.57 KB	-rw-r--r--
lpr.elc	9.44 KB	-rw-r--r--
ls-lisp.elc	22.7 KB	-rw-r--r--
macros.elc	7.23 KB	-rw-r--r--
makesum.elc	2.47 KB	-rw-r--r--
man.elc	53.85 KB	-rw-r--r--
master.elc	4.58 KB	-rw-r--r--
mb-depth.elc	3.56 KB	-rw-r--r--
md4.elc	8.12 KB	-rw-r--r--
menu-bar.elc	86.61 KB	-rw-r--r--
midnight.elc	10.22 KB	-rw-r--r--
minibuf-eldef.elc	6.43 KB	-rw-r--r--
minibuffer.elc	104.08 KB	-rw-r--r--
misc.elc	5.4 KB	-rw-r--r--
misearch.elc	12.37 KB	-rw-r--r--
mouse-copy.elc	3.61 KB	-rw-r--r--
mouse-drag.elc	6.43 KB	-rw-r--r--
mouse.elc	71.3 KB	-rw-r--r--
mpc.elc	79.29 KB	-rw-r--r--
msb.elc	26.76 KB	-rw-r--r--
mwheel.elc	12.83 KB	-rw-r--r--
newcomment.elc	39.43 KB	-rw-r--r--
notifications.elc	13.78 KB	-rw-r--r--
novice.elc	4.43 KB	-rw-r--r--
obarray.elc	1.71 KB	-rw-r--r--
outline.elc	37.04 KB	-rw-r--r--
paren.elc	8.69 KB	-rw-r--r--
password-cache.elc	3.57 KB	-rw-r--r--
pcmpl-cvs.elc	6.17 KB	-rw-r--r--
pcmpl-gnu.elc	12.96 KB	-rw-r--r--
pcmpl-linux.elc	3.09 KB	-rw-r--r--
pcmpl-rpm.elc	11.17 KB	-rw-r--r--
pcmpl-unix.elc	7.52 KB	-rw-r--r--
pcmpl-x.elc	8.95 KB	-rw-r--r--
pcomplete.elc	36.16 KB	-rw-r--r--
pixel-scroll.elc	10.82 KB	-rw-r--r--
plstore.elc	14.75 KB	-rw-r--r--
printing.elc	157.7 KB	-rw-r--r--
proced.elc	62.85 KB	-rw-r--r--
profiler.elc	42.81 KB	-rw-r--r--
ps-bdf.elc	12.69 KB	-rw-r--r--
ps-def.elc	2.23 KB	-rw-r--r--
ps-mule.elc	34.89 KB	-rw-r--r--
ps-print-loaddefs.el	2.6 KB	-rw-r--r--
ps-print.elc	141.17 KB	-rw-r--r--
ps-samp.elc	5.26 KB	-rw-r--r--
recentf.elc	48.73 KB	-rw-r--r--
rect.elc	26.88 KB	-rw-r--r--
register.elc	27.63 KB	-rw-r--r--
registry.elc	10.41 KB	-rw-r--r--
repeat.elc	5.14 KB	-rw-r--r--
replace.elc	84.62 KB	-rw-r--r--
reposition.elc	2.66 KB	-rw-r--r--
reveal.elc	7.16 KB	-rw-r--r--
rfn-eshadow.elc	7.23 KB	-rw-r--r--
rot13.elc	2.56 KB	-rw-r--r--
rtree.elc	4.09 KB	-rw-r--r--
ruler-mode.elc	21.87 KB	-rw-r--r--
savehist.elc	10.83 KB	-rw-r--r--
saveplace.elc	11.87 KB	-rw-r--r--
sb-image.elc	2.75 KB	-rw-r--r--
scroll-all.elc	4.41 KB	-rw-r--r--
scroll-bar.elc	16.68 KB	-rw-r--r--
scroll-lock.elc	5.41 KB	-rw-r--r--
select.elc	18.75 KB	-rw-r--r--
server.elc	47.56 KB	-rw-r--r--
ses.elc	131.12 KB	-rw-r--r--
shadowfile.elc	31.16 KB	-rw-r--r--
shell.elc	41.53 KB	-rw-r--r--
simple.elc	301.78 KB	-rw-r--r--
skeleton.elc	15.76 KB	-rw-r--r--
so-long.elc	47.15 KB	-rw-r--r--
sort.elc	15.49 KB	-rw-r--r--
soundex.elc	1.14 KB	-rw-r--r--
speedbar.elc	115.02 KB	-rw-r--r--
startup.elc	68.51 KB	-rw-r--r--
strokes.elc	44.03 KB	-rw-r--r--
subdirs.el	450 B	-rw-r--r--
subr.elc	186.63 KB	-rw-r--r--
svg.elc	12.71 KB	-rw-r--r--
t-mouse.elc	3.8 KB	-rw-r--r--
tab-bar.elc	52.48 KB	-rw-r--r--
tab-line.elc	29.85 KB	-rw-r--r--
tabify.elc	2.17 KB	-rw-r--r--
talk.elc	2.99 KB	-rw-r--r--
tar-mode.elc	57.2 KB	-rw-r--r--
tempo.elc	19.18 KB	-rw-r--r--
term.elc	107.99 KB	-rw-r--r--
thingatpt.elc	16.88 KB	-rw-r--r--
thread.elc	8.08 KB	-rw-r--r--
thumbs.elc	25.74 KB	-rw-r--r--
time-stamp.elc	18.69 KB	-rw-r--r--
time.elc	20.87 KB	-rw-r--r--
timezone.elc	10.94 KB	-rw-r--r--
tmm.elc	13.39 KB	-rw-r--r--
tool-bar.elc	9.76 KB	-rw-r--r--
tooltip.elc	13.19 KB	-rw-r--r--
tree-widget.elc	19.84 KB	-rw-r--r--
tutorial.elc	22.28 KB	-rw-r--r--
type-break.elc	37.35 KB	-rw-r--r--
uniquify.elc	17.68 KB	-rw-r--r--
userlock.elc	6.33 KB	-rw-r--r--
vcursor.elc	23.92 KB	-rw-r--r--
version.elc	6.01 KB	-rw-r--r--
view.elc	34.69 KB	-rw-r--r--
vt-control.elc	1.99 KB	-rw-r--r--
vt100-led.elc	1.33 KB	-rw-r--r--
w32-fns.elc	11.01 KB	-rw-r--r--
w32-vars.elc	5.16 KB	-rw-r--r--
wdired.elc	23.52 KB	-rw-r--r--
whitespace.elc	69.06 KB	-rw-r--r--
wid-browse.elc	8.48 KB	-rw-r--r--
wid-edit.elc	99.52 KB	-rw-r--r--
widget.elc	1.4 KB	-rw-r--r--
windmove.elc	19.82 KB	-rw-r--r--
window.elc	294.5 KB	-rw-r--r--
winner.elc	12.04 KB	-rw-r--r--
woman.elc	109.43 KB	-rw-r--r--
x-dnd.elc	19.56 KB	-rw-r--r--
xdg.elc	10.14 KB	-rw-r--r--
xml.elc	25.31 KB	-rw-r--r--
xt-mouse.elc	14.1 KB	-rw-r--r--
xwidget.elc	18.9 KB	-rw-r--r--

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

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

(byte-code "\300\301!\210\302\303\304\305\306\307\310\311\312\313&	\210\302\314\315\316\306\307\310\317\312\313&	\210\302\320\321\322\306\307\310\323\312\313&	\207" [require dnd custom-declare-variable x-dnd-test-function 'x-dnd-default-test-function "The function drag and drop uses to determine if to accept or reject a drop.\nThe function takes three arguments, WINDOW, ACTION and TYPES.\nWINDOW is where the mouse is when the function is called.  WINDOW may be a\nframe if the mouse isn't over a real window (i.e. menu bar, tool bar or\nscroll bar).  ACTION is the suggested action from the drag and drop source,\none of the symbols move, copy, link or ask.  TYPES is a list of available\ntypes for the drop.\n\nThe function shall return nil to reject the drop or a cons with two values,\nthe wanted action as car and the wanted type as cdr.  The wanted action\ncan be copy, move, link, ask or private.\nThe default value for this variable is `x-dnd-default-test-function'." :version "22.1" :type symbol :group x x-dnd-types-alist `((,(purecopy "text/uri-list") . x-dnd-handle-uri-list) (,(purecopy "text/x-moz-url") . x-dnd-handle-moz-url) (,(purecopy "_NETSCAPE_URL") . x-dnd-handle-uri-list) (,(purecopy "FILE_NAME") . x-dnd-handle-file-name) (,(purecopy "UTF8_STRING") . x-dnd-insert-utf8-text) (,(purecopy "text/plain;charset=UTF-8") . x-dnd-insert-utf8-text) (,(purecopy "text/plain;charset=utf-8") . x-dnd-insert-utf8-text) (,(purecopy "text/unicode") . x-dnd-insert-utf16-text) (,(purecopy "text/plain") . dnd-insert-text) (,(purecopy "COMPOUND_TEXT") . x-dnd-insert-ctext) (,(purecopy "STRING") . dnd-insert-text) (,(purecopy "TEXT") . dnd-insert-text)) "Which function to call to handle a drop of that type.\nIf the type for the drop is not present, or the function is nil,\nthe drop is rejected.  The function takes three arguments, WINDOW, ACTION\nand DATA.  WINDOW is where the drop occurred, ACTION is the action for\nthis drop (copy, move, link, private or ask) as determined by a previous\ncall to `x-dnd-test-function'.  DATA is the drop data.\nThe function shall return the action used (copy, move, link or private)\nif drop is successful, nil if not." alist x-dnd-known-types (mapcar 'purecopy '("text/uri-list" "text/x-moz-url" "_NETSCAPE_URL" "FILE_NAME" "UTF8_STRING" "text/plain;charset=UTF-8" "text/plain;charset=utf-8" "text/unicode" "text/plain" "COMPOUND_TEXT" "STRING" "TEXT")) "The types accepted by default for dropped data.\nThe types are chosen in the order they appear in the list." (repeat string)] 10)
#@413 The current state for a drop.
This is an alist with one entry for each display.  The value for each display
is a vector that contains the state for drag and drop for that display.
Elements in the vector are:
Last buffer drag was in,
last window drag was in,
types available for drop,
the action suggested by the source,
the type we want for the drop,
the action we want for the drop,
any protocol specific data.
(defvar x-dnd-current-state nil (#$ . 2950))
(defvar x-dnd-empty-state [nil nil nil nil nil nil nil])
#@69 Setup drag and drop for FRAME (i.e. create appropriate properties).
(defalias 'x-dnd-init-frame #[(&optional frame) "\301!\302=\205-�\303\304\"\210\303\305\"\210\303\306\"\210\303\307\"\210\303\310\"\210\303\311\"\210\312!\210\313!\207" [frame window-system x x-register-dnd-atom "DndProtocol" "_MOTIF_DRAG_AND_DROP_MESSAGE" "XdndEnter" "XdndPosition" "XdndLeave" "XdndDrop" x-dnd-init-xdnd-for-frame x-dnd-init-motif-for-frame] 3 (#$ . 3470)])
#@66 Return the entry in `x-dnd-current-state' for a frame or window.
(defalias 'x-dnd-get-state-cons-for-frame #[(frame-or-window) "\305!\203\n�\202
�\306!\307	\302\"\310\n\"\204\"�\n\311\f!BB\310\n\"*\207" [frame-or-window frame display x-dnd-current-state x-dnd-empty-state framep window-frame frame-parameter assoc copy-sequence] 3 (#$ . 3930)])
#@66 Return the state in `x-dnd-current-state' for a frame or window.
(defalias 'x-dnd-get-state-for-frame #[(frame-or-window) "\301!A\207" [frame-or-window x-dnd-get-state-cons-for-frame] 2 (#$ . 4290)])
#@387 The default test function for drag and drop.
WINDOW is where the mouse is when this function is called.  It may be
a frame if the mouse is over the menu bar, scroll bar or tool bar.
ACTION is the suggested action from the source, and TYPES are the
types the drop data can have.  This function only accepts drops with
types in `x-dnd-known-types'.  It always returns the action private.
(defalias 'x-dnd-default-test-function #[(_window _action types) "\302!\211\205�\303	B)\207" [types type x-dnd-choose-type private] 3 (#$ . 4498)])
#@132 Return the type we want the DND data to be in for the current drop.
FRAME-OR-WINDOW is the frame or window that the mouse is over.
(defalias 'x-dnd-current-type #[(frame-or-window) "\301!\302H\207" [frame-or-window x-dnd-get-state-for-frame 4] 2 (#$ . 5042)])
#@100 Remove all state for the last drop.
FRAME-OR-WINDOW is the frame or window that the mouse is over.
(defalias 'x-dnd-forget-drop #[(frame-or-window) "\302!\303	!\241\207" [frame-or-window x-dnd-empty-state x-dnd-get-state-cons-for-frame copy-sequence] 3 (#$ . 5310)])
#@235 Call `x-dnd-test-function' if something has changed.
WINDOW is the window the mouse is over.  ACTION is the suggested
action from the source.  If nothing has changed, return the last
action and type we got from `x-dnd-test-function'.
(defalias 'x-dnd-maybe-call-test-function #[(window action) "\306!\205	�\307!\310!\211	\311H\232\203&�	\312H\232\203&�	\313H\232\204K�r\n\203.�\nq\210\f	\314H#\315
A\"A\316\205H�
#+*\310!\211\317H	\320H)B\207" [window current-state buffer action x-dnd-test-function action-type window-live-p window-buffer x-dnd-get-state-for-frame 0 1 3 2 assoc x-dnd-save-state 5 4 x-dnd-types-alist handler] 6 (#$ . 5585)])
#@319 Save the state of the current drag and drop.
WINDOW is the window the mouse is over.  ACTION is the action suggested
by the source.  ACTION-TYPE is the result of calling `x-dnd-test-function'.
If given, TYPES are the types for the drop data that the source supports.
EXTRA-DATA is data needed for a specific protocol.
(defalias 'x-dnd-save-state #[(window action action-type &optional types extra-data) "\306!\211\307\n@I\210	\310\nAI\210	\311I\210\f\203�	\312\fI\210
\203'�	\313
I\210	\314I\210	\315\316!\2057�\317!I\210\320!	\241)\207" [window current-state action-type action types extra-data x-dnd-get-state-for-frame 5 4 3 2 6 1 0 window-live-p window-buffer x-dnd-get-state-cons-for-frame] 5 (#$ . 6257)])
#@331 Handle one item of type text/x-moz-url.
WINDOW is the window where the drop happened.  ACTION is ignored.
DATA is the moz-url, which is formatted as two strings separated by \r\n.
The first string is the URL, the second string is the title of that URL.
DATA is encoded in utf-16.  Decode the URL and call `x-dnd-handle-uri-list'.
(defalias 'x-dnd-handle-moz-url #[(window action data) "\306 \307=\203�\310\202\f�\311\312	\"\313\n\314\315#\211@\316
\f#,\207" [coding data string strings url window byteorder 66 utf-16be utf-16le decode-coding-string split-string "[
\n]" t x-dnd-handle-uri-list action] 5 (#$ . 6984)])
#@123 Decode the UTF-8 text and insert it at point.
TEXT is the text as a string, WINDOW is the window where the drop happened.
(defalias 'x-dnd-insert-utf8-text #[(window action text) "\303	\304\n\305\"#\207" [window action text dnd-insert-text decode-coding-string utf-8] 6 (#$ . 7617)])
#@124 Decode the UTF-16 text and insert it at point.
TEXT is the text as a string, WINDOW is the window where the drop happened.
(defalias 'x-dnd-insert-utf16-text #[(window action text) "\304 \305=\203�\306\202\f�\307\310	\n\311\"#)\207" [coding window action text byteorder 66 utf-16be utf-16le dnd-insert-text decode-coding-string] 6 (#$ . 7909)])
#@126 Decode the compound text and insert it at point.
TEXT is the text as a string, WINDOW is the window where the drop happened.
(defalias 'x-dnd-insert-ctext #[(window action text) "\303	\304\n\305\"#\207" [window action text dnd-insert-text decode-coding-string compound-text-with-extensions] 6 (#$ . 8265)])
#@184 Split an uri-list into separate URIs and call `dnd-handle-one-url'.
WINDOW is the window where the drop happened.
STRING is the uri-list as a string.  The URIs are separated by \r\n.
(defalias 'x-dnd-handle-uri-list #[(window action string) "\306\307\310#\311\211\311\211\203*�\f@\312
#\211\f\203\"�\f)\fA\211\204�*	*\207" [string retval uri-list bf --dolist-tail-- window split-string "[�
\n]" t nil dnd-handle-one-url action did-action] 5 (#$ . 8580)])
#@163 Convert file names to URLs and call `dnd-handle-one-url'.
WINDOW is the window where the drop happened.
STRING is the file names as a string, separated by nulls.
(defalias 'x-dnd-handle-file-name #[(window action string) "\306\307\310#	\206\n�\n\311\211\311\211\203P�@\f\203(�\312\f\"\313\314\315\306\316\"\316#P\317#\211\203F�*A\211\204�*+\207" [string file-name-coding-system default-file-name-coding-system retval coding uri-list split-string "[�
\n]" t nil encode-coding-string "file://" mapconcat url-hexify-string "/" dnd-handle-one-url bf --dolist-tail-- file-uri window action did-action] 7 (#$ . 9056)])
#@290 Choose which type we want to receive for the drop.
TYPES are the types the source of the drop offers, a vector of type names
as strings or symbols.  Select among the types in `x-dnd-known-types' or
KNOWN-TYPES if given, and return that type name.
If no suitable type is found, return nil.
(defalias 'x-dnd-choose-type #[(types &optional known-types) "\206�	\211@\f\205Q�\3062Q�
G\307\f
\f
W\203N�
\fH\2119\2034�\310!\2026�\232\203D�\311\306\"\210*\fT\211\f\202�*\3120\211\204d�\nA\203d�\313\f\nA\"\202f�,\207" [known-types x-dnd-known-types known-list first-known-type types types-array done 0 symbol-name throw nil x-dnd-choose-type i --dotimes-limit-- type typename found] 4 (#$ . 9713)])
#@362 Drop one data item onto a frame.
EVENT is the client message for the drop, FRAME is the frame the drop
occurred on.  WINDOW is the window of FRAME where the drop happened.
DATA is the data received from the source, and type is the type for DATA,
see `x-dnd-types-alist').

Returns the action used (move, copy, link, private) if drop was successful,
nil if not.
(defalias 'x-dnd-drop-data #[(event frame window data type) "\306	\"\211A\307\f!\211\310H\311!\211@\262\205\\�\312!\203L�\313!\204L�\314!\204L�\204A�\315\311!!b\210#\202\\�\316\317\f!\210#)-\207" [type x-dnd-types-alist type-info handler frame state assoc x-dnd-get-state-for-frame 5 event-start window-live-p window-minibuffer-p window-dedicated-p posn-point t select-frame action event w mouse-yank-at-point window data dnd-open-file-other-window] 5 (#$ . 10441)])
#@115 Receive drag and drop events (X client messages).
Currently XDND, Motif and old KDE 1.x protocols are recognized.
(defalias 'x-dnd-handle-drag-n-drop-event #[(event) "AA@\306!\211@\262	\307H	\310H	\311H	\312H\313\267\202>�\314\f\n
&\202Y�\315\f\n
&\202Y�G\316V\205Y�\317\307\316#\320\232\205Y�\321\f\n
&.\207" [event client-message window message-atom frame format event-start 0 1 2 3 #s(hash-table size 2 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("DndProtocol" 36 "_MOTIF_DRAG_AND_DROP_MESSAGE" 49)) x-dnd-handle-old-kde x-dnd-handle-motif 4 substring "Xdnd" x-dnd-handle-xdnd data] 7 (#$ . 11314) "e"])
#@35 Open the files in a KDE 1.x drop.
(defalias 'x-dnd-handle-old-kde #[(_event frame window _message _format _data) "\303\304\305\306\307%\310\n\311\312\313\314	##)\207" [frame values window x-window-property "DndSelection" nil 0 t x-dnd-handle-uri-list private replace-regexp-in-string "�$" ""] 7 (#$ . 11980)])
#@49 Mapping from XDND action types to lisp symbols.
(defconst x-dnd-xdnd-to-action '(("XdndActionPrivate" . private) ("XdndActionCopy" . copy) ("XdndActionMove" . move) ("XdndActionLink" . link) ("XdndActionAsk" . ask)) (#$ . 12298))
#@67 Set the XdndAware property for FRAME to indicate that we do XDND.
(defalias 'x-dnd-init-xdnd-for-frame #[(frame) "\301\302\303\304\305\306&\207" [frame x-change-window-property "XdndAware" (5) "ATOM" 32 t] 7 (#$ . 12534)])
#@264 Return the width/height to be sent in a XDndStatus message.
FRAME is the frame and W is the window where the drop happened.
If ACCEPT is nil return 0 (empty rectangle),
otherwise if W is a window, return its width/height,
otherwise return the frame width/height.
(defalias 'x-dnd-get-drop-width-height #[(frame w accept) "\203&�\304	!\203�\305	!\306\n8\n@Z\307\n8\nA@Z)B\207\310!\311!B\207\312\207" [accept w edges frame windowp window-inside-pixel-edges 2 3 frame-pixel-width frame-pixel-height 0] 3 (#$ . 12766)])
#@260 Return the x/y coordinates to be sent in a XDndStatus message.
Coordinates are required to be absolute.
FRAME is the frame and W is the window where the drop happened.
If W is a window, return its absolute coordinates,
otherwise return the frame coordinates.
(defalias 'x-dnd-get-drop-x-y #[(frame w) "\306\307\"\211:\203�	A@\202�	\306\310\"\211:\203\"�A@\202#�\311
!\203?�\312
!\n@\\\fA@\\)B\202B�\n\fB,\207" [frame frame-left frame-real-left frame-top frame-real-top w frame-parameter left top windowp window-inside-pixel-edges edges] 4 (#$ . 13294)])
#@72 Return the version byte from the 32 bit FLAGS in an XDndEnter message.
(defalias 'x-dnd-version-from-flags #[(flags) ":\203�\301@\302\"\207\301\303\"\207" [flags ash -8 -24] 3 (#$ . 13870)])
#@75 Return the nmore-than3 bit from the 32 bit FLAGS in an XDndEnter message.
(defalias 'x-dnd-more-than-3-from-flags #[(flags) ":\203�\301A\302\"\207\301\302\"\207" [flags logand 1] 3 (#$ . 14071)])
#@272 Receive one XDND event (client message) and send the appropriate reply.
EVENT is the client message.  FRAME is where the mouse is now.
WINDOW is the window within FRAME where the mouse is now.
FORMAT is 32 (not used).  MESSAGE is the data part of an XClientMessageEvent.
(defalias 'x-dnd-handle-xdnd #[(event frame window message _format data) "\306\267\2023	\307H\310\n!\311\n!	\312H\300\313\f#\210\205J�\3140\315\211\f\312V\2038�\316\3171\320
\315\321&\202I�\322\323	\324H!\323	\325H!\323	\326H!#$,\207\323	\326H!2	\312H\3270\33023\"A\"4\3314@3\"@\2115\203{�4\203{�\307\202|�\3126\332\3331\334\"!6\33510\"\336106\307=#5\206\235�\312\2577\3371
1\340\3417&.\207\3420!\207\3430!\203\301�\3440!\210	\312H\3450!\205\325�\346\347\350\3450!!\"8\315\211928\205\3511\370�\352:108\3450!%0\202;\300\353;\"\210)\315\2112\203\f\307\202
\3129\3371
1\354\341\332\3331\334\"!9\211\203(\355\202)\312E&\210\3420!,\207\356\357	#\207" [message data flags version more-than-3 dnd-source #s(hash-table size 4 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("XdndEnter" 6 "XdndPosition" 76 "XdndLeave" 176 "XdndDrop" 181)) 1 x-dnd-version-from-flags x-dnd-more-than-3-from-flags 0 "%s %s" x-dnd-save-state nil x-window-property "XdndTypeList" "AnyPropertyType" t vector x-get-atom-name 2 3 4 x-dnd-maybe-call-test-function assoc rassoc string-to-number frame-parameter outer-window-id x-dnd-get-drop-x-y x-dnd-get-drop-width-height x-send-client-message "XdndStatus" 32 x-dnd-forget-drop windowp select-window x-dnd-current-type x-get-selection-internal XdndSelection intern (error) x-dnd-drop-data "Error: %s" "XdndFinished" "XdndActionPrivate" error "Unknown XDND message %s %s" window frame action x-dnd-xdnd-to-action action-type reply-action accept list-to-send value success event info] 12 (#$ . 14278)])
#@75 Set _MOTIF_DRAG_RECEIVER_INFO for FRAME to indicate that we do Motif DND.
(defalias 'x-dnd-init-motif-for-frame #[(frame) "\301\302\303 \304\305\304\211\211\211\211\211\211\211\211\211\211\211\211\257\302\306\307&\207" [frame x-change-window-property "_MOTIF_DRAG_RECEIVER_INFO" byteorder 0 5 8 t] 18 (#$ . 16165)])
(defalias 'x-dnd-get-motif-value #[(data offset size byteorder) "\304\267\202`�	\305=\203�\306\nTH\307\"\nH\\\207\306\nH\307\"\nTH\\\207	\305=\203E�\306\n\310\\H\307\"\n\311\\H\\\306\nTH\307\"\nH\\B\207\306\nH\307\"\nTH\\\306\n\311\\H\307\"\n\310\\H\\B\207\312\207" [size byteorder data offset #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (2 6 4 36)) 108 ash 8 3 2 nil] 5])
(defalias 'x-dnd-motif-value-to-list #[(value size byteorder) "\304\267\202U�\305\306	\307\"\310\"\305	\310\"D\202V�	:\2038�\305\306	@\307\"\310\"\305	@\310\"\305\306	A\307\"\310\"\305	A\310\"F\202V�\305\306	\311\"\310\"\305\306	\312\"\310\"\305\306	\307\"\310\"\305	\310\"F\202V�\313\314=\203c�\315\n!\202d�\n)\207" [size value bytes byteorder #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (2 6 4 21)) logand ash -8 255 -24 -16 nil 108 reverse] 6])
#@50 Mapping from numbers to Motif DND message types.
(defvar x-dnd-motif-message-types '((0 . XmTOP_LEVEL_ENTER) (1 . XmTOP_LEVEL_LEAVE) (2 . XmDRAG_MOTION) (3 . XmDROP_SITE_ENTER) (4 . XmDROP_SITE_LEAVE) (5 . XmDROP_START) (6 . XmDROP_FINISH) (7 . XmDRAG_DROP_FINISH) (8 . XmOPERATION_CHANGED)) (#$ . 17410))
#@49 Mapping from number to operation for Motif DND.
(defvar x-dnd-motif-to-action '((1 . move) (2 . copy) (3 . link) (4 . link) (2 . private)) (#$ . 17722))
(defalias 'x-dnd-handle-motif #[(event frame window message-atom _format data) "\306\307H	\"A\310H\311 \312\313\211$\306\314\315
\"4\"A5\n\316\267\202\"\312\317\320$6\312\321\320$7\3227!\2118\205H�\323\3248!\325\"9\326:!\2109\205^�\327;\330\21196%,\202(\330\202(\331:!<\332\312\320\211$\320\f#=\332\312\317\313$\313\f#>\332\312\333\313$\313\f#?<\334H6<\335H?@\336;5\"A\337A@4\"@B\332B\203\276�\340B\341\342#\202\277�\341\313\f#C\343\344@\203\317�\335\202\320�\313\\\fDC=>?%D\345:6:\346\317D&.\n\202(\331:!<\332\312\320\211$\320\f#=<\334H6\336;5\"A\337A@4\"@B\332B\203)\340B\341\342#\202*\341\313\f#C\343\347\fDC=#D\345:6:\346\317D&.\202(\332\312\317\313$\313\f#>\332\312\333\313$\313\f#?\312\321\320$7\3227!8\312\350\320$6\336;5\"A\337A@4\"@B\332B\203\233\340B\341\342#\202\234\351\313\f#C\343\352\fDC>?$D\312\320\211$=\330E\345:6:\346\317D&\210B\2058\205\323\3248!\324\353;!!\"\211F\205\3541\371\355G:;F\353;!%0\202H\356\357H\"\210)\330)E\323\3248!E\203\360\202\361=#\210\326:!.\202(\362\363I#-\207" [data x-dnd-motif-message-types message-type source-byteorder my-byteorder source-flags assoc 0 1 byteorder x-dnd-get-motif-value 2 logand 15 #s(hash-table size 5 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (XmTOP_LEVEL_ENTER 39 XmTOP_LEVEL_LEAVE 98 XmDRAG_MOTION 102 XmOPERATION_CHANGED 240 XmDROP_START 332)) 8 4 12 x-get-atom-name x-get-selection-internal intern TARGETS x-dnd-forget-drop x-dnd-save-state nil x-dnd-get-state-for-frame x-dnd-motif-value-to-list 10 6 3 x-dnd-maybe-call-test-function rassoc + 48 1792 append 128 x-send-client-message "_MOTIF_DRAG_AND_DROP_MESSAGE" 136 16 560 133 x-dnd-current-type (error) x-dnd-drop-data message "Error: %s" XmTRANSFER_SUCCESS XmTRANSFER_FAILURE error "Unknown Motif DND message %s %s" x-dnd-motif-to-action source-action dnd-source selection-atom atom-name types frame window state timestamp x y first-move action-type reply-action reply-flags reply action value event info message-atom] 8])
(provide 'x-dnd)

${this.title}

Code Editor : x-dnd.elc