diff --git a/gui-lib/mred/private/wxme/pasteboard.rkt b/gui-lib/mred/private/wxme/pasteboard.rkt
index b1fa0408..05bb243f 100644
--- a/gui-lib/mred/private/wxme/pasteboard.rkt
+++ b/gui-lib/mred/private/wxme/pasteboard.rkt
@@ -1860,7 +1860,7 @@
     (let ([snip (new string-snip%)])
       (set-snip-style! snip (or (get-default-style)
                                 (send s-style-list basic-style)))
-      (send snip insert str)
+      (send snip insert str (string-length str))
       (insert-paste-snip snip #f)))
   
   (def/override (kill [exact-integer? [time 0]])