Better default info balance for box model gist

Author: japhb

lib/Terminal/Widgets/Layout.rakumod

@@ -55,8 +55,15 @@ class Style
         my $padding = $.has-padding ?? ($.pt, $.pr, $.pb, $.pl).join(',') !! 0;
         my $border  = $.has-border  ?? ($.bt, $.br, $.bb, $.bl).join(',') !! 0;
         my $margin  = $.has-margin  ?? ($.mt, $.mr, $.mb, $.ml).join(',') !! 0;
-
-        "$.sizing-box p:$padding b:$border m:$margin " ~
+        my $wc      = $.width-correction;
+        my $hc      = $.height-correction;
+        my $lc      = $.left-correction;
+        my $rc      = $.right-correction;
+        my $tc      = $.top-correction;
+        my $bc      = $.bottom-correction;
+
+        ("$.sizing-box p:$padding b:$border m:$margin wc:$wc=$lc+$rc hc:$hc=$tc+$bc "
+         if $.has-framing) ~
         'w:(' ~ ($.min-w, $.set-w, $.max-w).map({ $_ // '*'}).join(':')
          ~ (' min' if $.minimize-w) ~ ') ' ~
         'h:(' ~ ($.min-h, $.set-h, $.max-h).map({ $_ // '*'}).join(':')