22 lines
625 B
Plaintext
22 lines
625 B
Plaintext
$OpenBSD: patch-Src_C64_x_i,v 1.1.1.1 2000/07/07 14:29:51 espie Exp $
|
|
--- Src/C64_x.i.orig Wed Aug 6 20:56:25 1997
|
|
+++ Src/C64_x.i Thu Jul 6 18:52:43 2000
|
|
@@ -100,7 +100,16 @@ void C64::c64_ctor1(void)
|
|
gui = 0;
|
|
#else
|
|
// try to start up Tk gui.
|
|
- gui = new CmdPipe("wish", "TkGui.tcl");
|
|
+ char *wishName = getenv("WISH");
|
|
+ if (wishName == NULL)
|
|
+ wishName = WISH;
|
|
+ char *d = getenv("FRODOLIBDIR");
|
|
+ if (d == NULL)
|
|
+ d = FRODOLIBDIR;
|
|
+ char buffer[1024];
|
|
+ snprintf(buffer, sizeof(buffer), "%s/%s", d, "TkGui.tcl");
|
|
+
|
|
+ gui = new CmdPipe(wishName, buffer);
|
|
if (gui) {
|
|
if (gui->fail) {
|
|
delete gui; gui = 0;
|