From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Tue, 17 Aug 2021 23:48:28 +0000 (-0700)
Subject: improve menu
X-Git-Tag: 20210717.02~42
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=81c82f74617d55caa9f9383d381812436a49f84b;p=perltidy.git

improve menu
---

diff --git a/dev-bin/perltidy_random_setup.pl b/dev-bin/perltidy_random_setup.pl
index 22740f6e..abc50249 100755
--- a/dev-bin/perltidy_random_setup.pl
+++ b/dev-bin/perltidy_random_setup.pl
@@ -261,9 +261,9 @@ EOM
     while (1) {
         my $nfiles_new    = @{$rnew_files};
         my $total_size_mb = file_size_sum_mb($rnew_files);
+        my $file_info     = get_file_info($rnew_files);
         my $ans           = queryu(<<EOM);
-
-   Number of files = $nfiles_new ; Total size $total_size_mb;
+$file_info
 R  Redo with a different glob
 F  Reduce total size by a fraction
 Y  Yes .. use these files