Accept section "l" for w3mman

This commit is contained in:
Tatsuya Kinoshita
2020-09-28 21:53:22 +09:00
parent bb5a62d4a4
commit ff09f20da6

View File

@@ -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 .= "&section=" . &form_encode($_); $query .= "&section=" . &form_encode($_);
} else { } else {