diff --git a/src/foreign/foreign.ssc b/src/foreign/foreign.ssc
index d673b0e881..8d0505d8fc 100755
--- a/src/foreign/foreign.ssc
+++ b/src/foreign/foreign.ssc
@@ -1,6 +1,6 @@
 #!/bin/sh
 #| -*- C -*-
-exec mzscheme "$0" > `echo "$0" | sed 's/ssc$/c/'` "$0"
+exec racket "$0" > `echo "$0" | sed 's/ssc$/c/'` "$0"
 |#
 
 #lang scribble/text
diff --git a/src/racket/gc2/sighand.c b/src/racket/gc2/sighand.c
index 3403c5c655..3dca69cadf 100644
--- a/src/racket/gc2/sighand.c
+++ b/src/racket/gc2/sighand.c
@@ -26,8 +26,8 @@
 static void launchgdb() {
   pid_t pid = getpid();
   char inbuffer[10];
-  
-  fprintf(stderr, "pid # %i run gdb \"gdb ./mzscheme3m %i\" or kill process.\n", pid, pid);
+
+  fprintf(stderr, "pid # %i run gdb \"gdb ./racket3m %i\" or kill process.\n", pid, pid);
   fflush(stderr);
 
   while(read(fileno(stdin), inbuffer, 10) <= 0){
diff --git a/src/racket/oskglue.inc b/src/racket/oskglue.inc
index f0f0fb7605..ff1a6f2e00 100644
--- a/src/racket/oskglue.inc
+++ b/src/racket/oskglue.inc
@@ -59,7 +59,7 @@ oskit_error_t fs_gettime(struct oskit_timespec *tsp)
 
 int gethostname(char *s, int len)
 {
-  strncpy(s, "mzscheme-machine", len);
+  strncpy(s, "racket-machine", len);
   return 0;
 }
 
diff --git a/src/racket/sgc/checkreg b/src/racket/sgc/checkreg
index 910f72d0f3..55a5f5b00a 100755
--- a/src/racket/sgc/checkreg
+++ b/src/racket/sgc/checkreg
@@ -1,5 +1,5 @@
 #!/bin/sh
-string=? ; exec ${PLTHOME}/bin/mzscheme -gqr $0 "$@"
+string=? ; exec ${PLTHOME}/bin/racket -gqr $0 "$@"
 
 ; Script to check that global and static variables are registered
 
diff --git a/src/racket/sgc/sgcdiff b/src/racket/sgc/sgcdiff
index 6ab0cf3644..8ed9bb796a 100755
--- a/src/racket/sgc/sgcdiff
+++ b/src/racket/sgc/sgcdiff
@@ -1,5 +1,5 @@
 #!/bin/sh
-string=? ; exec $PLTHOME/bin/mzscheme -agrq $0 "$@"
+string=? ; exec $PLTHOME/bin/racket -agrq $0 "$@"
 
 ;; This script reads a stream of sgc (dump-memory-stats) output until
 ;; EOF. Then, the avg change per dump is reported for all types. This
diff --git a/src/racket/src/error.c b/src/racket/src/error.c
index 6c5cbcf5d0..9c5c689d6b 100644
--- a/src/racket/src/error.c
+++ b/src/racket/src/error.c
@@ -1574,13 +1574,13 @@ static void do_wrong_syntax(const char *where,
   } else if (where == scheme_application_stx_string) {
     who = scheme_intern_symbol("#%app");
     nomwho = who;
-    mod = scheme_intern_symbol("mzscheme");
+    mod = scheme_intern_symbol("racket");
   } else if ((where == scheme_set_stx_string)
 	     || (where == scheme_var_ref_string)
 	     || (where == scheme_begin_stx_string)) {
     who = scheme_intern_symbol(where);
     nomwho = who;
-    mod = scheme_intern_symbol("mzscheme");
+    mod = scheme_intern_symbol("racket");
     if (where == scheme_begin_stx_string)
       where = "begin (possibly implicit)";
   }
diff --git a/src/racket/src/makeexn b/src/racket/src/makeexn
index 1d48f88410..8b45cef5c4 100755
--- a/src/racket/src/makeexn
+++ b/src/racket/src/makeexn
@@ -1,9 +1,9 @@
 #!/bin/sh
 #|
 if [ "$PLTHOME" = "" ]; then
-  exec mzscheme -um "$0" "$@"
+  exec racket -um "$0" "$@"
 else
-  exec ${PLTHOME}/bin/mzscheme -um $0 "$@"
+  exec ${PLTHOME}/bin/racket -um $0 "$@"
 fi
 |#
 
diff --git a/src/racket/src/module.c b/src/racket/src/module.c
index 9ca3ef498a..763f410933 100644
--- a/src/racket/src/module.c
+++ b/src/racket/src/module.c
@@ -3311,8 +3311,8 @@ static Scheme_Module *module_load(Scheme_Object *name, Scheme_Env *env, const ch
       char *mred_note;
 
       if (!strcmp(SCHEME_SYM_VAL(SCHEME_PTR_VAL(name)), "#%mred-kernel")
-	  && !(scheme_strncmp(scheme_banner(), "Welcome to MzScheme", 19)))
-	mred_note = "; need to run in mred instead of mzscheme";
+	  && !(scheme_strncmp(scheme_banner(), "Welcome to Racket", 17)))
+	mred_note = "; need to run in gracket instead of racket";
       else
 	mred_note = "";
 
diff --git a/src/racket/src/mzrt.c b/src/racket/src/mzrt.c
index 8694a71806..507689fc1f 100644
--- a/src/racket/src/mzrt.c
+++ b/src/racket/src/mzrt.c
@@ -70,7 +70,7 @@ static void rungdb() {
         return;
         break;
       case 'd':
-        snprintf(outbuffer, 100, "xterm -e gdb ./mzscheme3m %d &", pid);
+        snprintf(outbuffer, 100, "xterm -e gdb ./racket3m %d &", pid);
         fprintf(stderr, "%s\n", outbuffer);
         if(system(outbuffer)) 
           fprintf(stderr, "system failed\n");
diff --git a/src/worksp/mzconfig.h b/src/worksp/mzconfig.h
index 46eb42583d..1fb7254bdc 100644
--- a/src/worksp/mzconfig.h
+++ b/src/worksp/mzconfig.h
@@ -1,6 +1,6 @@
 
 /* This file contains information for Windows that is collected using the
- * "configure" script on other platforms.  See src/mzscheme/mzconfig.h.in for
+ * "configure" script on other platforms.  See src/racket/mzconfig.h.in for
  * things that should be defined here.
  */