blob: 2cd644f1a901945b1628af03df2e35f7600a8859 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
--- getquote Sun May 14 13:28:49 2000
+++ getquote.new Sat May 20 01:37:30 2000
@@ -1,6 +1,6 @@
#!/usr/bin/perl
- $wget_loc = "wget";
+ $wget_loc = "fetch";
# used to have some "which" here, replaced it..
@@ -77,7 +77,7 @@
#
$tempfile = "stock.tmp.$$";
- $wget_args = " --cache=off --tries 0 -q -O $home/.wmstock/$tempfile \"$URL\"";
+ $wget_args = " -p -o $home/.wmstock/$tempfile \"$URL\"";
$command = $wget_loc.$wget_args;
$result = system ("$wget_loc$wget_args");
if ($result != 0) {
@@ -118,7 +118,7 @@
$version = $_[0];
$vtempfile = "newest";
$vers_url="http://www.mattfischer.com/wmstock/src/$vtempfile";
- $wget_args = " --cache=off --tries 0 -q -O $home/.wmstock/$vtempfile \"$vers_url\"";
+ $wget_args = " -p -o $home/.wmstock/$vtempfile \"$vers_url\"";
$command = $wget_loc.$wget_args;
|
