diff --git a/collects/meta/props b/collects/meta/props
index 6f1ef378d1..5445f37d89 100755
--- a/collects/meta/props
+++ b/collects/meta/props
@@ -598,7 +598,7 @@ path/s is either such a string or a list of them.
 "collects/drscheme/private/tracing.rkt" drdr:command-line "mred-text -t ~s"
 "collects/drscheme/private/unit.rkt" drdr:command-line "mred-text -t ~s"
 "collects/drscheme/sprof.rkt" drdr:command-line "mred-text -t ~s"
-"collects/drscheme/syncheck-drscheme-button.rkt" drdr:command-line "mred-text ~s"
+"collects/drscheme/syncheck-drracket-button.rkt" drdr:command-line "mred-text ~s"
 "collects/drscheme/syncheck.rkt" drdr:command-line "mred-text -t ~s"
 "collects/drscheme/tool-lib.rkt" drdr:command-line "mzc ~s"
 "collects/dynext" responsible (mflatt)
@@ -1454,10 +1454,10 @@ path/s is either such a string or a list of them.
 "collects/tests/racket/benchmarks/common/takl.rkt" drdr:command-line "mzc ~s"
 "collects/tests/racket/benchmarks/common/takr.rkt" drdr:command-line "mzc ~s"
 "collects/tests/racket/benchmarks/common/takr2.rkt" drdr:command-line "mzc ~s"
-"collects/tests/racket/benchmarks/mz/expand-class.scm" drdr:command-line "racket -f ~s"
-"collects/tests/racket/benchmarks/mz/parsing.scm" drdr:command-line "mred -f ~s"
-"collects/tests/racket/benchmarks/mz/redsem.scm" drdr:command-line "racket -f ~s -- --skip-struct-test"
-"collects/tests/racket/benchmarks/mz/ssax.scm" drdr:command-line "racket -f ~s"
+"collects/tests/racket/benchmarks/mz/expand-class.rktl" drdr:command-line "racket -f ~s"
+"collects/tests/racket/benchmarks/mz/parsing.rktl" drdr:command-line "mred -f ~s"
+"collects/tests/racket/benchmarks/mz/redsem.rkt" drdr:command-line "racket -f ~s -- --skip-struct-test"
+"collects/tests/racket/benchmarks/mz/ssax.rktl" drdr:command-line "racket -f ~s"
 "collects/tests/racket/benchmarks/rx/auto.rkt" drdr:command-line "racket -qt ~s -- racket simple" drdr:timeout 600
 "collects/tests/racket/benchmarks/rx/pcre.rkt" drdr:command-line "racket ~s \"mz\"\"scheme\""
 "collects/tests/racket/benchmarks/shootout/ackermann.rkt" drdr:command-line "racket -t ~s -- 10"
diff --git a/collects/tests/net/encoders.rkt b/collects/tests/net/encoders.rkt
index b32bfc8b01..43f77399d7 100644
--- a/collects/tests/net/encoders.rkt
+++ b/collects/tests/net/encoders.rkt
@@ -12,12 +12,12 @@
           (make-bytes 204 (char->integer #\x))
           (list->bytes (for/list ([i (in-range 256)]) i))
           ;; Something that doesn't end with a LF:
-          (bytes-append (with-input-from-file (build-path dir "net.rkt")
+          (bytes-append (with-input-from-file (build-path dir "net.rktl")
                           (lambda () (read-bytes 500)))
            #"xxx")
           ;; CRLF:
           (regexp-replace #rx#"\r?\n"
-                          (with-input-from-file (build-path dir "net.rkt")
+                          (with-input-from-file (build-path dir "net.rktl")
                             (lambda () (read-bytes 500)))
            #"\r\n"))))
 
@@ -61,7 +61,7 @@
                    ;; check 1/4 of the files, randomly
                    (let ([p (build-path dir f)])
                      (and (zero? (random 4))
-                          (not (regexp-match #rx"^flat.*\\.rkt$"
+                          (not (regexp-match #rx"^flat.*\\.rktl$"
                                              (path-element->string f)))
                           (file-exists? p)
                           p)))
diff --git a/collects/tests/racket/benchmarks/mz/expand-class.scm b/collects/tests/racket/benchmarks/mz/expand-class.rktl
similarity index 65%
rename from collects/tests/racket/benchmarks/mz/expand-class.scm
rename to collects/tests/racket/benchmarks/mz/expand-class.rktl
index 6dce8b4458..5cf21bd6b8 100644
--- a/collects/tests/racket/benchmarks/mz/expand-class.scm
+++ b/collects/tests/racket/benchmarks/mz/expand-class.rktl
@@ -1,7 +1,7 @@
 
-(let ([dir (build-path (collection-path "scheme")
+(let ([dir (build-path (collection-path "racket")
                        "private")])
-  (with-input-from-file (build-path dir "class-internal.ss")
+  (with-input-from-file (build-path dir "class-internal.rkt")
     (lambda ()
       (parameterize ([current-load-relative-directory dir]
 		     [read-accept-reader #t])
diff --git a/collects/tests/racket/benchmarks/mz/parsing.scm b/collects/tests/racket/benchmarks/mz/parsing.rktl
similarity index 100%
rename from collects/tests/racket/benchmarks/mz/parsing.scm
rename to collects/tests/racket/benchmarks/mz/parsing.rktl
diff --git a/collects/tests/racket/benchmarks/mz/redsem.scm b/collects/tests/racket/benchmarks/mz/redsem.rkt
similarity index 100%
rename from collects/tests/racket/benchmarks/mz/redsem.scm
rename to collects/tests/racket/benchmarks/mz/redsem.rkt
diff --git a/collects/tests/racket/benchmarks/mz/ssax.scm b/collects/tests/racket/benchmarks/mz/ssax.rktl
similarity index 100%
rename from collects/tests/racket/benchmarks/mz/ssax.scm
rename to collects/tests/racket/benchmarks/mz/ssax.rktl
diff --git a/collects/tests/racket/filelib.rktl b/collects/tests/racket/filelib.rktl
index 42cfa13006..bd0367ca98 100644
--- a/collects/tests/racket/filelib.rktl
+++ b/collects/tests/racket/filelib.rktl
@@ -64,9 +64,9 @@
     (test #f null? (member "filelib.rktl" rel))
     (test #f null? (member (build-path (current-directory) "filelib.rktl") abs))
 
-    (test (list (string->path "filelib.rktl")) find-files (lambda (f) (regexp-match "^filelib[.]rkt$" (path->string f))))
+    (test (list (string->path "filelib.rktl")) find-files (lambda (f) (regexp-match "^filelib[.]rktl$" (path->string f))))
     (test (list (build-path (current-directory) "filelib.rktl"))
-	  find-files (lambda (f) (regexp-match "filelib[.]rkt$" (path->string f)))
+	  find-files (lambda (f) (regexp-match "filelib[.]rktl$" (path->string f)))
 	  (current-directory))
 
     (let ([rel2 (fold-files (lambda (name kind accum)