From: <jgr...@us...> - 2003-03-03 23:14:46
|
Update of /cvsroot/popfile/engine/POPFile In directory sc8-pr-cvs1:/tmp/cvs-serv22945/POPFile Modified Files: Module.pm Log Message: Got to the point where the absolute basics are working; i.e. if you have a POPFile setup already then you can download and get your mail classified; don't expect statistics, history or reclassification to behave yet, but we are getting closer; also MailParse and Bayes are still messing around inside each others private variables Index: Module.pm =================================================================== RCS file: /cvsroot/popfile/engine/POPFile/Module.pm,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** Module.pm 3 Mar 2003 22:01:35 -0000 1.3 --- Module.pm 3 Mar 2003 23:14:43 -0000 1.4 *************** *** 247,250 **** --- 247,270 ---- } + # --------------------------------------------------------------------------------------------- + # + # global_config_ + # + # Called by a subclass to get or set a global (i.e. not module specific) configuration parameter + # + # $name The name of the parameter (e.g. 'port') + # $value (optional) The value to set + # + # If called with just a $name then global_config_() will return the current value + # of the configuration parameter. + # + # --------------------------------------------------------------------------------------------- + sub global_config_ + { + my ( $self, $name, $value ) = @_; + + return $self->{configuration__}->parameter( "GLOBAL_$name", $value ); + } + # GETTER/SETTER methods. Note that I do not expect documentation of these unless they # are non-trivial since the documentation would be a waste of space |