diff options
| author | Rob Austein <sra@hactrn.net> | 2006-09-12 02:25:57 +0000 |
|---|---|---|
| committer | Rob Austein <sra@hactrn.net> | 2006-09-12 02:25:57 +0000 |
| commit | 93a881b4408a625b3dc747f774c650e7e6f98982 (patch) | |
| tree | 2ff488d92d5b8eda1505486b6e8f880766e395f2 /scripts/generate-testrepo.pl | |
| parent | 51b2d27599e35bf48ff2ccf977b73d72b7286b80 (diff) | |
Plugged preexisting memory leak in "openssl ca".
svn path=/scripts/generate-testrepo.pl; revision=263
Diffstat (limited to 'scripts/generate-testrepo.pl')
| -rw-r--r-- | scripts/generate-testrepo.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/scripts/generate-testrepo.pl b/scripts/generate-testrepo.pl index f7714031..df57243d 100644 --- a/scripts/generate-testrepo.pl +++ b/scripts/generate-testrepo.pl @@ -9,13 +9,17 @@ my %parent; my @ordering; my %hashes; +my $openssl = "../../openssl/trunk/apps/openssl"; my $subdir = "apacheca"; my $passwd = "fnord"; my $keybits = 2048; my $verbose = 0; +my $debug = 1; sub openssl { - !system("openssl", @_) + print(STDERR join(" ", qw(+ openssl), @_), "\n") + if ($debug); + !system($openssl, @_) or die("openssl @_ returned $?\n"); } |