From: Po Lu Date: Sat, 26 Mar 2022 02:17:12 +0000 (+0800) Subject: Fix compiler warning in x-dnd.el X-Git-Tag: emacs-29.0.90~1931^2~913 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=66f6324a58a9580f8a3f2f53532838c463581999;p=emacs.git Fix compiler warning in x-dnd.el * lisp/x-dnd.el (x-dnd-xdnd-to-action): Move declaration earlier. --- diff --git a/lisp/x-dnd.el b/lisp/x-dnd.el index e801c4fdfce..17e65adc64e 100644 --- a/lisp/x-dnd.el +++ b/lisp/x-dnd.el @@ -118,6 +118,14 @@ any protocol specific data.") (declare-function x-get-selection-internal "xselect.c" (selection-symbol target-type &optional time-stamp terminal)) +(defconst x-dnd-xdnd-to-action + '(("XdndActionPrivate" . private) + ("XdndActionCopy" . copy) + ("XdndActionMove" . move) + ("XdndActionLink" . link) + ("XdndActionAsk" . ask)) + "Mapping from XDND action types to Lisp symbols.") + (defvar x-dnd-empty-state [nil nil nil nil nil nil nil]) (declare-function x-register-dnd-atom "xselect.c") @@ -394,14 +402,6 @@ Currently XDND, Motif and old KDE 1.x protocols are recognized." ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; XDND protocol. -(defconst x-dnd-xdnd-to-action - '(("XdndActionPrivate" . private) - ("XdndActionCopy" . copy) - ("XdndActionMove" . move) - ("XdndActionLink" . link) - ("XdndActionAsk" . ask)) - "Mapping from XDND action types to Lisp symbols.") - (declare-function x-change-window-property "xfns.c" (prop value &optional frame type format outer-P))