diff options
author | wens <wens@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2008-07-18 12:14:36 +0800 |
---|---|---|
committer | wens <wens@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2008-07-18 12:14:36 +0800 |
commit | 31acdd74c177f6de8f94012d7cb03ad8e96e521c (patch) | |
tree | 99ec3a9aacb69828dcaa220812f3cf53c3b02fcf | |
parent | 595caca7a6ac1a552bff4aa90a04614d095bb976 (diff) | |
download | pttbbs-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.pm | 1 | ||||
-rw-r--r-- | util/weather.perl | 2 |
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"); |