From 4279fe3c4f2f687a6c939127b6c497f7695a00a5 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@barzilay.org>
Date: Mon, 17 May 2010 09:54:17 -0400
Subject: [PATCH] Some "org.plt-scheme" -> "org.racket-lang"s

---
 collects/compiler/embed-unit.rkt | 2 +-
 src/gracket/grmain.cxx           | 2 +-
 src/mac/racket/simpledrop.cpp    | 2 +-
 src/wxmac/src/mac/wx_win.cc      | 4 ++--
 4 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/collects/compiler/embed-unit.rkt b/collects/compiler/embed-unit.rkt
index f30fdb1cf0..4a7de59766 100644
--- a/collects/compiler/embed-unit.rkt
+++ b/collects/compiler/embed-unit.rkt
@@ -216,7 +216,7 @@
                              creator
                              
                              "CFBundleIdentifier" 
-                             (format "org.plt-scheme.~a" (path->string name)))]
+                             (format "org.racket-lang.~a" (path->string name)))]
                  [new-plist (if uti-exports
                                 (plist-replace
                                  new-plist
diff --git a/src/gracket/grmain.cxx b/src/gracket/grmain.cxx
index c6b63fab20..18b04acf94 100644
--- a/src/gracket/grmain.cxx
+++ b/src/gracket/grmain.cxx
@@ -605,7 +605,7 @@ int APIENTRY WinMain_dlls_ready(HINSTANCE hInstance, HINSTANCE hPrevInstance, LP
     a = (char *)malloc(j + l + 50);
     memcpy(a, normalized_path, j);
     memcpy(a + j, b, l);
-    memcpy(a + j + l, "MrEd-" MRED_GUID, strlen(MRED_GUID) + 6);
+    memcpy(a + j + l, "GRacket-" MRED_GUID, strlen(MRED_GUID) + 9);
     mutex = CreateMutex(NULL, FALSE, a);
     alreadyrunning = (GetLastError() == ERROR_ALREADY_EXISTS || 
 		      GetLastError() == ERROR_ACCESS_DENIED);
diff --git a/src/mac/racket/simpledrop.cpp b/src/mac/racket/simpledrop.cpp
index 0d927d9993..a3dd70b6f7 100644
--- a/src/mac/racket/simpledrop.cpp
+++ b/src/mac/racket/simpledrop.cpp
@@ -433,7 +433,7 @@ void wxDrop_GetArgs(int *argc, char ***argv, int *in_terminal)
 
 #define BUFSIZE 1000
 #define RSRCNAME "starter-info"
-#define EXECNAME "MrEd"
+#define EXECNAME "GRacket"
 
 static CFPropertyListRef getPropertyList()
 {
diff --git a/src/wxmac/src/mac/wx_win.cc b/src/wxmac/src/mac/wx_win.cc
index 493d95787e..b623648c48 100644
--- a/src/wxmac/src/mac/wx_win.cc
+++ b/src/wxmac/src/mac/wx_win.cc
@@ -599,7 +599,7 @@ void wxWindow::CreatePaintControl(int inset, Bool opaque)
       { kEventClassControl, kEventControlHitTest },
       { kEventClassControl, kEventControlGetPartRegion } };
     
-    HIObjectRegisterSubclass(CFSTR("org.plt-scheme.MrEdPaintControl"),
+    HIObjectRegisterSubclass(CFSTR("org.racket-lang.GRacketPaintControl"),
 			     kHIViewClassID, // base class ID
 			     NULL, // option bits
 			     paintControlHandler,
@@ -622,7 +622,7 @@ void wxWindow::CreatePaintControl(int inset, Bool opaque)
   SetEventParameter(constructData, 'Boun', typeQDRectangle,
 		    sizeof(Rect), &boundsRect);
 
-  err = HIObjectCreate(CFSTR("org.plt-scheme.MrEdPaintControl"),
+  err = HIObjectCreate(CFSTR("org.racket-lang.GRacketPaintControl"),
 		       constructData,
 		       (HIObjectRef *)&pane);
   cPaintControl = pane;