Merge pull request #1 from jeffgoh/jeffgoh-patch-1

Simplify multi-column to single column fixes cyrusimap#4184
jeffgoh · Mar 9, 2024 · 76de124 · 76de124
2 parents 0c2ebac + 9a0df89
commit 76de124
Showing 1 changed file with 2 additions and 7 deletions.
diff --git a/perl/imap/IMAP/Shell.pm b/perl/imap/IMAP/Shell.pm
@@ -685,13 +685,8 @@ sub _sc_list {
   $w = $ll if $w > $ll;
   my $n = int($ll / $w);
   my $c;
-  for ($l = 0; $l < int((@l + $n - 1) / $n); $l++) {
-    for ($c = 0; $c < @l; $c += int((@l + $n - 1) / $n)) {
-      if ($l + $c < @l) {
-        $lfh->[1]->print($l[$l + $c], ' ' x ($w + 1 - length($l[$l + $c])));
-      }
-    }
-    $lfh->[1]->print("\n");
+  for (@l) {
+    $lfh->[1]->print("$_","\n");
   }
   0;
 }