storm/w3m
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

rewind to 10 Feb 2006.

Browse Source
This commit is contained in:
Dai Sato
2006-04-07 15:31:52 +00:00
parent 75a6671d6c
commit 608eca22f6
3 changed files with 17 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
scripts/w3mman/w3mman.in
View File

@@ -8,7 +8,6 @@ sub usage {
($_ = $0) =~ s@.*/@@;
print STDERR "$_ [-M <path>] [[<section>] <command>]\n";
print STDERR "$_ [-M <path>] [-k <keyword>]\n";
print STDERR "$_ [-l <file>]\n";
exit 1;
}
@@ -21,10 +20,6 @@ while (@ARGV) {
} elsif (/^-k$/) {
@ARGV || &usage();
$query = "?keyword=" . &form_encode(shift @ARGV);
} elsif (/^-l$/) {
@ARGV || &usage();
$query = "?quit=ok&local=" . &form_encode(shift @ARGV);
$query .= "&pwd=" . &form_encode($ENV{'PWD'});
} elsif (/^-/) {
&usage();
} elsif (/^\d/ || $_ eq 'n') {