summaryrefslogtreecommitdiff
path: root/misc/gkrellweather2/files/patch-GrabWeather
diff options
context:
space:
mode:
Diffstat (limited to 'misc/gkrellweather2/files/patch-GrabWeather')
-rw-r--r--misc/gkrellweather2/files/patch-GrabWeather18
1 files changed, 18 insertions, 0 deletions
diff --git a/misc/gkrellweather2/files/patch-GrabWeather b/misc/gkrellweather2/files/patch-GrabWeather
new file mode 100644
index 000000000000..aa1cdc3c8b22
--- /dev/null
+++ b/misc/gkrellweather2/files/patch-GrabWeather
@@ -0,0 +1,18 @@
+--- GrabWeather.orig Sun Feb 27 08:54:47 2005
++++ GrabWeather Sun Feb 27 08:54:47 2005
+@@ -1,4 +1,4 @@
+-#!/usr/bin/perl
++#!/usr/bin/env perl
+
+ #
+ # Grabs the latest local weather conditions from the
+@@ -40,8 +40,7 @@
+ # Is LWP installed?
+ eval { require LWP::UserAgent };
+ if ($@) {
+- my $cmd = qq{wget --proxy=off --passive-ftp --tries=0 --quiet } .
+- qq{--output-document=$home/$ReportDir/$HTMLFileName $URL};
++ my $cmd = qq{fetch -d -p -1 -q -o $home/$ReportDir/$HTMLFileName $URL};
+ `$cmd` == 0 or die "unable to fetch weather: $?";
+ } else {
+ $ENV{FTP_PASSIVE} = 1; # LWP uses Net::FTP internally.