about summary refs log tree commit diff stats
path: root/lib/Taurus/CLI.rakumod
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Taurus/CLI.rakumod')
-rw-r--r--lib/Taurus/CLI.rakumod9
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/Taurus/CLI.rakumod b/lib/Taurus/CLI.rakumod
index a7759b0..7d80f51 100644
--- a/lib/Taurus/CLI.rakumod
+++ b/lib/Taurus/CLI.rakumod
@@ -77,11 +77,11 @@ multi sub MAIN (
     $p0.select-first;
     $p0.select(2);
     $p0.on: select => -> :%meta {
+        my Int $fmt = 16;
         if %meta<all> {
+            ui.focus(:pane(1));
             $p1.clear;
             with @logs {
-                my Int $fmt = 16;
-
                 my $outgoing = .grep(*.[2] eqv "Outgoing Call").map(*.[4]).sum;
                 my $incoming = .grep(*.[2] eqv "Incoming Call").map(*.[4]).sum;
 
@@ -90,9 +90,9 @@ multi sub MAIN (
                 $p1.put: "%-*s %s".sprintf($fmt, "Total:",  seconds-to-str($outgoing + $incoming));
                 $p1.put: "";
             }
+            $p1.select-first;
         } elsif %meta<number> -> $num {
-            my Int $fmt = 18;
-
+            ui.focus(:pane(1));
             $p1.clear;
             $p1.put: "Name:   " ~ $_ with %contacts{$num};
             $p1.put: "Number: " ~ $num;
@@ -113,6 +113,7 @@ multi sub MAIN (
                 $p1.put: "%-*s %d".sprintf($fmt, "Missed Calls:",
                                            .grep(*.[2] eqv "Missed Call").elems);
             }
+            $p1.select-first;
         }
     }