From: Andres S. <di...@us...> - 2005-02-11 18:47:44
|
Update of /cvsroot/tuxaator/tuxaator/Plugins/Weather In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4325/Plugins/Weather Modified Files: Plugin.pm Log Message: improved configurability re $cachedir Index: Plugin.pm =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/Plugins/Weather/Plugin.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** Plugin.pm 17 Sep 2003 05:50:56 -0000 1.1 --- Plugin.pm 11 Feb 2005 18:47:33 -0000 1.2 *************** *** 1,3 **** --- 1,11 ---- package Weather; + + # Configuration + # (FIXME: should go to central configuration infrastructure) + + our $cachedir = "/home/tux/tuxaator/cache"; + + # Code + sub new { my $class = shift; *************** *** 30,34 **** my $msg = join " " => @_; # anwer goes to the channel, otherwise it doesnt make too much sense ! open F, "</home/duke/tuxcvs/tuxaator/cache/ee-ilm.txt"; my @lines = <F>; my $ilm = join(', ',map "$_" => @lines); --- 38,42 ---- my $msg = join " " => @_; # anwer goes to the channel, otherwise it doesnt make too much sense ! open F, "<$cachedir/ee-ilm.txt"; my @lines = <F>; my $ilm = join(', ',map "$_" => @lines); |