From 5e8adebac2899d60fffc53d4692bc4972abcf795 Mon Sep 17 00:00:00 2001
From: Matthias Melcher <github@matthiasm.com>
Date: Sun, 3 Sep 2023 00:09:32 +0200
Subject: Adds compact buttons feature to create keypads.

See test/buttons for an example.
---
 fluid/widget_panel.fl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'fluid/widget_panel.fl')

diff --git a/fluid/widget_panel.fl b/fluid/widget_panel.fl
index 1ebbaa7d6..139dbe716 100644
--- a/fluid/widget_panel.fl
+++ b/fluid/widget_panel.fl
@@ -655,7 +655,12 @@ Use Ctrl-J for newlines.} xywh {95 285 310 20} labelfont 1 labelsize 11 textsize
           } {}
         }
         Fl_Box {} {
-          xywh {95 140 300 40} labelsize 11 resizable
+          xywh {95 165 300 40} labelsize 11 resizable
+        }
+        Fl_Light_Button {} {
+          label Compact
+          callback compact_cb
+          tooltip {use compact box types for closely set buttons} xywh {95 140 90 20} selection_color 1 labelsize 11
         }
       }
       Fl_Group {} {
-- 
cgit v1.2.3