fix: keep owner data when transferable is string

clj-commons · Mar 28, 2014 · 6fc3c01 · 6fc3c01
1 parent 3bae3be
commit 6fc3c01
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/seesaw/clipboard.clj b/src/seesaw/clipboard.clj
@@ -37,7 +37,7 @@
    (let [cb (system)]
      (cond
        (string? transferable)
-         (contents! (dnd/default-transferable [dnd/string-flavor transferable]))
+         (contents! (dnd/default-transferable [dnd/string-flavor transferable]) owner)
      :else
        (.setContents (system) ^java.awt.datatransfer.Transferable transferable owner))
      cb)))