blob: 6d190fb677b60e59cdc5e0878193b48712fd7c00 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
--- src/aoe/TclApp.cc.orig Sat Nov 27 18:38:25 1999
+++ src/aoe/TclApp.cc Sat Nov 27 18:43:51 1999
@@ -186,9 +186,9 @@
// Call Tcl function to create a Tcl command
if (Tcl_CreateCommand(ptInterp,
pcCommand->getName(),
- TclCommand::command,
+ &TclCommand::command,
(ClientData)pcCommand,
- TclCommand::cleanUp) == NULL) return 0;
+ &TclCommand::cleanUp) == NULL) return 0;
return 1;
}
|
