Adjust input widget rendering based on available symbol set

japhb · May 21, 2023 · 0d77720 · 0d77720
1 parent bc9bff9
commit 0d77720
Show file tree

Hide file tree

Showing 3 changed files with 17 additions and 7 deletions.
diff --git a/lib/Terminal/Widgets/Input/Button.rakumod b/lib/Terminal/Widgets/Input/Button.rakumod
@@ -1,5 +1,6 @@
 # ABSTRACT: General clickable button
 
+use Terminal::Widgets::TerminalCapabilities;
 use Terminal::Widgets::Events;
 use Terminal::Widgets::Input;
 use Terminal::Widgets::Input::Labeled;
@@ -10,9 +11,10 @@ class Terminal::Widgets::Input::Button
  does Terminal::Widgets::Input::Labeled {
     #| Refresh the whole input
     method full-refresh(Bool:D :$print = True) {
-        # my $text = '[' ~ (self.label || 'Button') ~ ']';
-        my $text = '⌈' ~ (self.label || 'Button') ~ '⌋';
-
+        my $label      = self.label || 'Button';
+        my $symbol-set = self.terminal.caps.symbol-set;
+        my $text       = $symbol-set >= Uni1 ?? '⌈' ~ $label ~ '⌋'
+                                             !! '[' ~ $label ~ ']';
         $.grid.clear;
         $.grid.set-span(0, 0, $text, self.current-color);
         self.composite(:$print);

diff --git a/lib/Terminal/Widgets/Input/Checkbox.rakumod b/lib/Terminal/Widgets/Input/Checkbox.rakumod
@@ -10,8 +10,12 @@ class Terminal::Widgets::Input::Checkbox
  does Terminal::Widgets::Input::Labeled {
     #| Checkbox glyphs
     method checkbox-text() {
-        # $.state ?? '[x]' !! '[ ]'
-        $.state ?? '🞕' !! '🞏'
+        my constant %boxes =
+            ASCII => « '[ ]' [x] »,
+            Uni1  => «   ☐    ☒  »,
+            Uni7  => «   🞏    🞕  »;
+
+        self.terminal.caps.best-symbol-choice(%boxes)[+$.state]
     }
 
     #| Refresh just the value, without changing anything else

diff --git a/lib/Terminal/Widgets/Input/RadioButton.rakumod b/lib/Terminal/Widgets/Input/RadioButton.rakumod
@@ -27,8 +27,12 @@ class Terminal::Widgets::Input::RadioButton
 
     #| Radio button glyphs
     method button-text() {
-        # $.state ?? '(*)' !! '( )'
-        $.state ?? '🞊' !! '🞅';
+        my constant %buttons =
+            ASCII => « '( )' (*) »,
+            Uni1  => «   ○    ⊙  »,
+            Uni7  => «   🞅    🞊  »;
+
+        self.terminal.caps.best-symbol-choice(%buttons)[+$.state]
     }
 
     #| Refresh just the value, without changing anything else