Add legacy mode inspired by the work of virtuallyfun/tenox7

[micropolis] / src / tk / tkwindow.c

diff --git a/src/tk/tkwindow.c b/src/tk/tkwindow.c
index c7a7ed24fd77d15b77825c1b484927a1cbb031ae..5f568e2aeac99867921484544c9b528612de6a02 100644 (file)
--- a/src/tk/tkwindow.c
+++ b/src/tk/tkwindow.c
@@ -134,6 +134,7 @@ TkCmd commands[] = {
     {"tkwait",         Tk_TkwaitCmd},
     {"update",         Tk_UpdateCmd},
     {"winfo",          Tk_WinfoCmd},
+    {"winfo-setlegacy",        Tk_WinfoCmdSetLegacy},
     {"wm",             Tk_WmCmd},
     {"accept",         Tcp_AcceptCmd},
     {"shutdown",       Tcp_ShutdownCmd},