From 6dcdc303c0321634ebfb232efaae3cd372551736 Mon Sep 17 00:00:00 2001
From: unknown <tim@threads.polyesthetic.msg>
Date: Mon, 5 Feb 2001 22:21:36 -0500
Subject: Perl cleanups in sql-bench.
Thanks to Chris Richmond MD6-FDC <crichmon@pcocd2.intel.com> for the
patch.
sql-bench/crash-me.sh:
fix bug with $limits{create_index} handling.
fix typo (result_type -> $result_type).
sql-bench/server-cfg.sh:
fix uninitialized variable warning.
---
sql-bench/server-cfg.sh | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
(limited to 'sql-bench/server-cfg.sh')
diff --git a/sql-bench/server-cfg.sh b/sql-bench/server-cfg.sh
index 6e27e84a08d..8ede6022cfc 100644
--- a/sql-bench/server-cfg.sh
+++ b/sql-bench/server-cfg.sh
@@ -124,7 +124,7 @@ sub new
$limits{'max_conditions'} = 9999; # (Actually not a limit)
$limits{'max_columns'} = 2000; # Max number of columns in table
# Windows can't handle that many files in one directory
- $limits{'max_tables'} = ($machine =~ "^win") ? 5000 : 65000;
+ $limits{'max_tables'} = (($machine || '') =~ "^win") ? 5000 : 65000;
$limits{'max_text_size'} = 65000; # Max size with default buffers.
$limits{'query_size'} = 1000000; # Max size with default buffers.
$limits{'max_index'} = 16; # Max number of keys
--
cgit v1.2.1