1 files changed, 16 insertions, 1 deletions
diff --git a/body/c_fl_box.cpp b/body/c_fl_box.cpp
index e9c170d..22ef21e 100644
--- a/body/c_fl_box.cpp
+++ b/body/c_fl_box.cpp
@@ -6,6 +6,17 @@
 
 #include <FL/Fl_Box.H>
 #include "c_fl_box.h"
+#include "c_fl.h"
+
+
+
+
+//  Telprot stopover
+
+extern "C" void box_extra_init_hook(void * aobj, int x, int y, int w, int h, const char * l);
+void fl_box_extra_init(void * adaobj, int x, int y, int w, int h, const char * label) {
+    box_extra_init_hook(adaobj, x, y, w, h, label);
+}
 
 
 
@@ -55,7 +66,11 @@ BOX new_fl_box2(int k, int x, int y, int w, int h, char * label) {
 }
 
 void free_fl_box(BOX b) {
-    delete static_cast<My_Box*>(b);
+    if (fl_inside_callback) {
+        fl_delete_widget(b);
+    } else {
+        delete static_cast<My_Box*>(b);
+    }
 }