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
|