fix problem with gracket locating the pref file for low-level prefs

This commit is contained in:
Matthew Flatt 2010-05-05 07:34:37 -06:00
parent 7359a6f9d0
commit 0497baece8

View File

@ -2778,9 +2778,9 @@ int wxGetPreference(const char *name, char *res, long len)
if (!ends_in_slash) if (!ends_in_slash)
s[l++] = '/'; s[l++] = '/';
# ifdef wx_mac # ifdef wx_mac
memcpy(s + l, "org.racket-lang.prefs.rktd", 24); memcpy(s + l, "org.racket-lang.prefs.rktd", 26);
# else # else
memcpy(s + l, "racket-prefs.rktd", 13); memcpy(s + l, "racket-prefs.rktd", 17);
# endif # endif
#endif #endif
@ -2796,7 +2796,7 @@ int wxGetPreference(const char *name, char *res, long len)
memcpy(s, home, l); memcpy(s, home, l);
if (!ends_in_slash) if (!ends_in_slash)
s[l++] = '\\'; s[l++] = '\\';
memcpy(s + l, "racket-prefs.rktd", 13); memcpy(s + l, "racket-prefs.rktd", 17);
#endif #endif
/*************** Mac OS Classic ***************/ /*************** Mac OS Classic ***************/
@ -2825,7 +2825,7 @@ int wxGetPreference(const char *name, char *res, long len)
memcpy(s, home, l); memcpy(s, home, l);
if (!ends_in_slash) if (!ends_in_slash)
s[l++] = ':'; s[l++] = ':';
memcpy(s + l, "org.racket-lang.prefs.rktd", 24); memcpy(s + l, "org.racket-lang.prefs.rktd", 26);
} }
#endif #endif