diff --git a/collects/mred/private/snipfile.rkt b/collects/mred/private/snipfile.rkt
index 3749c5b5e4..2a609cb24d 100644
--- a/collects/mred/private/snipfile.rkt
+++ b/collects/mred/private/snipfile.rkt
@@ -212,7 +212,7 @@
 				      v)))
 			      close)])
 		  (when lock-while-reading? 
-                    (send text begin-edit-sequencce)
+                    (send text begin-edit-sequence)
                     (send text lock #t))
                   (if (is-a? snip wx:string-snip%)
 		      ;; Special handling for initial snip string in