[bongo-patches] Always call `x-get-selection' instead of `x-get-clipboard' (reported by Dieter Deyke)

[Daniel Brockman]

Mon Feb  5 00:55:35 CET 2007  Daniel Brockman <address@hidden>

 * Always call `x-get-selection' instead of
   `x-get-clipboard' (reported by Dieter Deyke).

diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el  2007-02-05 01:14:21.000000000 +0100
+++ new-bongo/bongo.el  2007-02-05 01:14:21.000000000 +0100
@@ -6412,9 +6412,7 @@
                      (let ((primary (x-get-selection)))
                        (and (bongo-uri-p primary) primary)))
                 (and (x-selection-exists-p 'CLIPBOARD)
-                     (let ((clipboard (if (fboundp 'x-get-clipboard)
-                                          (x-get-clipboard)
-                                        (x-get-selection 'CLIPBOARD))))
+                     (let ((clipboard (x-get-selection 'CLIPBOARD)))
                        (and (bongo-uri-p clipboard) clipboard)))))
           (uri
            (read-string (concat "Insert URI"

-- 
Daniel Brockman <address@hidden>