diff --git a/collects/mred/private/snipfile.ss b/collects/mred/private/snipfile.ss
index f18d620d..78e4d7c3 100644
--- a/collects/mred/private/snipfile.ss
+++ b/collects/mred/private/snipfile.ss
@@ -254,7 +254,7 @@
     (let ([p (open-input-file filename)])
       (port-count-lines! p)
       (let ([p (cond
-		[(regexp-match-peek #rx#"^(?:#reader(lib\"read[.]ss\"\"wxme\"))?WXME01[0-9][0-9] ##[ \r\n]" p)
+		[(regexp-match-peek #rx#"^(?:#reader[(]lib\"read[.]ss\"\"wxme\"[)])?WXME01[0-9][0-9] ##[ \r\n]" p)
 		 (let ([t (make-object text%)])
 		   (send t insert-port p 'standard)
 		   (close-input-port p)