summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorwens <wens@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>2008-07-18 12:14:36 +0800
committerwens <wens@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>2008-07-18 12:14:36 +0800
commit31acdd74c177f6de8f94012d7cb03ad8e96e521c (patch)
tree99ec3a9aacb69828dcaa220812f3cf53c3b02fcf
parent595caca7a6ac1a552bff4aa90a04614d095bb976 (diff)
downloadpttbbs-31acdd74c177f6de8f94012d7cb03ad8e96e521c.tar
pttbbs-31acdd74c177f6de8f94012d7cb03ad8e96e521c.tar.gz
pttbbs-31acdd74c177f6de8f94012d7cb03ad8e96e521c.tar.bz2
pttbbs-31acdd74c177f6de8f94012d7cb03ad8e96e521c.tar.lz
pttbbs-31acdd74c177f6de8f94012d7cb03ad8e96e521c.tar.xz
pttbbs-31acdd74c177f6de8f94012d7cb03ad8e96e521c.tar.zst
pttbbs-31acdd74c177f6de8f94012d7cb03ad8e96e521c.zip
Fix weather report
git-svn-id: http://opensvn.csie.org/pttbbs/trunk/pttbbs@4388 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
-rw-r--r--sample/LocalVars.pm1
-rw-r--r--util/weather.perl2
2 files changed, 2 insertions, 1 deletions
diff --git a/sample/LocalVars.pm b/sample/LocalVars.pm
index 7b5d7c9f..13a5d0cc 100644
--- a/sample/LocalVars.pm
+++ b/sample/LocalVars.pm
@@ -25,6 +25,7 @@ $TMP = '/tmp';
# program
$TAR = '/usr/bin/tar';
$LYNX = '/usr/local/bin/lynx'; # /usr/ports/www/lynx
+$WGET = '/usr/local/bin/wget'; # /usr/ports/www/wget
$GREP = '/usr/bin/grep';
# BLOG:
diff --git a/util/weather.perl b/util/weather.perl
index 36d773d7..27c08d47 100644
--- a/util/weather.perl
+++ b/util/weather.perl
@@ -20,7 +20,7 @@ sub weather_report
# Header
# ¤º®e
- open(WEATHER, "$LYNX -assume_charset=big5 -assume_local_charset=big5 -dump -nolist $link|");
+ open(WEATHER, "$WGET --quiet -O - $link|");
while (<WEATHER>) {
print BBSPOST if ($_ ne "\n");