Merge branch 'jmrenouard:master' into perltidy

lewart3 · web-flow · commit 9c6729b1fb26 · 2026-02-14T04:57:27.000-06:00
diff --git a/mysqltuner.pl b/mysqltuner.pl
@@ -4084,7 +4084,8 @@ sub check_storage_engines {
             }
         }
     }
-    while ( my ( $engine, $size ) = each(%enginestats) ) {
+    foreach my $engine ( sort keys %enginestats ) {
+        my $size = $enginestats{$engine};
         infoprint "Data in $engine tables: "
           . hr_bytes($size)
           . " (Tables: "

Original file line number	Diff line number	Diff line change
`@@ -4084,7 +4084,8 @@ sub check_storage_engines {`
`4084`	`4084`	`}`
`4085`	`4085`	`}`
`4086`	`4086`	`}`
`4087`		`- while ( my ( $engine, $size ) = each(%enginestats) ) {`
	`4087`	`+ foreach my $engine ( sort keys %enginestats ) {`
	`4088`	`+ my $size = $enginestats{$engine};`
`4088`	`4089`	`infoprint "Data in $engine tables: "`
`4089`	`4090`	`. hr_bytes($size)`
`4090`	`4091`	`. " (Tables: "`