diff options
| author | fukachan <fukachan> | 2001-10-18 03:40:51 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-10-18 03:40:51 +0000 |
| commit | ece119bc5adb2b01f8a6e5646d99870af695d9bf (patch) | |
| tree | 2f09305cda9dae1ab6d51028d20d21818f572d85 /regress/base | |
| parent | 1d5766a8f6947dfed63f0c5642391edb0b315c59 (diff) | |
| download | fml8-ece119bc5adb2b01f8a6e5646d99870af695d9bf.tar.gz fml8-ece119bc5adb2b01f8a6e5646d99870af695d9bf.tar.bz2 fml8-ece119bc5adb2b01f8a6e5646d99870af695d9bf.zip | |
enhance argv: $0 key unit
Diffstat (limited to 'regress/base')
| -rwxr-xr-x | regress/base/journaleddir.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/regress/base/journaleddir.pl b/regress/base/journaleddir.pl index 7cdca8a0..8730deb2 100755 --- a/regress/base/journaleddir.pl +++ b/regress/base/journaleddir.pl @@ -1,6 +1,6 @@ #!/usr/bin/env perl # -# $FML: journaleddir.pl,v 1.2 2001/08/21 10:30:32 fukachan Exp $ +# $FML: journaleddir.pl,v 1.3 2001/08/22 21:58:50 fukachan Exp $ # BEGIN { @@ -12,7 +12,7 @@ use Tie::JournaledDir; $| = 1; my $key = shift || 'uja'; -my $unit = 2; +my $unit = shift || 2; my $dir = "/tmp/fml5/jd"; |