Accept section "l" for w3mman
This commit is contained in:
@@ -31,7 +31,7 @@ while (@ARGV) {
|
|||||||
$query .= "&pwd=" . &form_encode($ENV{'PWD'});
|
$query .= "&pwd=" . &form_encode($ENV{'PWD'});
|
||||||
} elsif (/^-/) {
|
} elsif (/^-/) {
|
||||||
&usage();
|
&usage();
|
||||||
} elsif (/^\d/ || $_ eq 'n') {
|
} elsif (/^\d/ || $_ eq 'n' || $_ eq 'l') {
|
||||||
if ( $query eq "" ) { $query = "?quit=ok"; }
|
if ( $query eq "" ) { $query = "?quit=ok"; }
|
||||||
$query .= "§ion=" . &form_encode($_);
|
$query .= "§ion=" . &form_encode($_);
|
||||||
} else {
|
} else {
|
||||||
|
|||||||
Reference in New Issue
Block a user