Parent Directory | Revision Log | Patch
revision 1.4 by dpavlin, Tue Aug 5 21:10:28 2003 UTC | revision 1.5 by dpavlin, Tue Aug 5 21:43:24 2003 UTC | |
---|---|---|
# | Line 41 Options: | Line 41 Options: |
41 | exit ((scalar(@ARGV) < 2)? 1:0); | exit ((scalar(@ARGV) < 2)? 1:0); |
42 | } | } |
43 | ||
44 | $RServ::quiet = !$verbose; | |
45 | if ($debug) { | |
46 | $RServ::quiet = 0; | |
47 | no warnings 'vars'; | |
48 | $RServ::debug = $debug; | |
49 | } | |
50 | ||
51 | my $master = $ARGV[0] || "master"; | my $master = $ARGV[0] || "master"; |
52 | my $slave = $ARGV[1] || "slave"; | my $slave = $ARGV[1] || "slave"; |
53 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |