From 08c69a548ce78be6a7cd4e227a8d20e6bb1de070 Mon Sep 17 00:00:00 2001
From: Matthias Melcher <git@matthiasm.com>
Date: Mon, 13 Dec 2021 18:02:27 +0100
Subject: STR 3442: changed .cxx file, but not .fl

---
 fluid/about_panel.fl    | 4 ++--
 fluid/function_panel.fl | 8 ++++++--
 2 files changed, 8 insertions(+), 4 deletions(-)

(limited to 'fluid')

diff --git a/fluid/about_panel.fl b/fluid/about_panel.fl
index 6c5fd3d9e..da76c82c8 100644
--- a/fluid/about_panel.fl
+++ b/fluid/about_panel.fl
@@ -61,12 +61,12 @@ Version x.x.x}
     }
     Fl_Button {} {
       label {View License...}
-      callback {show_help("license.html");}
+      callback {show_help("license.html");} selected
       xywh {115 145 123 25} labelcolor 136
     }
     Fl_Return_Button {} {
       label Close
-      callback {((Fl_Window*)(o->parent()))->hide();} selected
+      callback {((Fl_Window*)(o->parent()))->hide();}
       xywh {250 145 83 25}
     }
   }
diff --git a/fluid/function_panel.fl b/fluid/function_panel.fl
index e3f4d76de..9bfb27446 100644
--- a/fluid/function_panel.fl
+++ b/fluid/function_panel.fl
@@ -528,7 +528,11 @@ Function {make_comment_panel()} {} {
 Function {type_make_cb(Fl_Widget*,void*d)} {open return_type void
 } {
   code {const char *type_name = (const char*)d;
-add_new_widget_from_user(type_name);} {}
+if (Fl_Type::current && Fl_Type::current->is_group())
+  add_new_widget_from_user(type_name, kAddAsLastChild);
+else
+  add_new_widget_from_user(type_name, kAddAfterCurrent);} {selected
+  }
 }
 
 Function {make_widgetbin()} {open
@@ -606,7 +610,7 @@ else
     } {
       Fl_Button {} {
         user_data {"Fl_Window"}
-        callback type_make_cb selected
+        callback type_make_cb
         tooltip Window xywh {89 21 24 24} box THIN_UP_BOX
         code0 {o->image(pixmap[1]);}
         class Widget_Bin_Window_Button
-- 
cgit v1.2.3