]> code.delx.au - gnu-emacs/commitdiff
* x-dnd.el (x-dnd-test-function, x-dnd-protocol-alist)
authorJan Djärv <jan.h.d@swipnet.se>
Sun, 31 Oct 2004 08:33:38 +0000 (08:33 +0000)
committerJan Djärv <jan.h.d@swipnet.se>
Sun, 31 Oct 2004 08:33:38 +0000 (08:33 +0000)
(x-dnd-types-alist, x-dnd-open-file-other-window)
(x-dnd-known-types): Add :version.

lisp/ChangeLog
lisp/x-dnd.el

index ff85283bcc9a74fed1b5e6b92e211501d1cf0292..8e4994f1800d2798c8dd636779cb4fb83f5f58be 100644 (file)
@@ -1,3 +1,9 @@
+2004-10-31  Jan Dj\e,Ad\e(Brv  <jan.h.d@swipnet.se>
+
+       * x-dnd.el (x-dnd-test-function, x-dnd-protocol-alist)
+       (x-dnd-types-alist, x-dnd-open-file-other-window)
+       (x-dnd-known-types): Add :version.
+
 2004-10-31  John Paul Wallington  <jpw@gnu.org>
 
        * ibuffer.el (group ibuffer): Add :version keyword.
index 0f9237f34096146432535a307647d247a317acb0..f2b081fdcc5b9a8b37367545a2de6ac572d94881 100644 (file)
@@ -47,6 +47,7 @@ The function shall return nil to reject the drop or a cons with two values,
 the wanted action as car and the wanted type as cdr.  The wanted action
 can be copy, move, link, ask or private.
 The default value for this variable is `x-dnd-default-test-function'."
+  :version "21.4"
   :type 'symbol
   :group 'x)
 
@@ -69,6 +70,7 @@ Insertion of text is not handeled by these functions, see `x-dnd-types-alist'
 for that.
 The function shall return the action done (move, copy, link or private)
 if some action was made, or nil if the URL is ignored."
+  :version "21.4"
   :type 'alist
   :group 'x)
 
@@ -96,11 +98,13 @@ this drop (copy, move, link, private or ask) as determined by a previous
 call to `x-dnd-test-function'.  DATA is the drop data.
 The function shall return the action used (copy, move, link or private) if drop
 is successful, nil if not."
+  :version "21.4"
   :type 'alist
   :group 'x)
 
 (defcustom x-dnd-open-file-other-window nil
   "If non-nil, always use find-file-other-window to open dropped files."
+  :version "21.4"
   :type 'boolean
   :group 'x)
 
@@ -120,6 +124,7 @@ is successful, nil if not."
     )
   "The types accepted by default for dropped data.
 The types are chosen in the order they appear in the list."
+  :version "21.4"
   :type '(repeat string)
   :group 'x
 )