Some "org.plt-scheme" -> "org.racket-lang"s

This commit is contained in:
Eli Barzilay 2010-05-17 09:54:17 -04:00
parent 9592b91a2f
commit 4279fe3c4f
4 changed files with 5 additions and 5 deletions

View File

@ -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

View File

@ -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);

View File

@ -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()
{

View File

@ -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;