From: <jgr...@us...> - 2003-05-08 00:53:49
|
Update of /cvsroot/popfile/engine/Platform In directory sc8-pr-cvs1:/tmp/cvs-serv14948 Modified Files: MSWin32.pm Log Message: Added -windows_trayicon option so that the tray icon can be disabled Index: MSWin32.pm =================================================================== RCS file: /cvsroot/popfile/engine/Platform/MSWin32.pm,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** MSWin32.pm 7 May 2003 16:31:50 -0000 1.6 --- MSWin32.pm 8 May 2003 00:53:45 -0000 1.7 *************** *** 39,42 **** --- 39,58 ---- # --------------------------------------------------------------------------------------------- # + # initialize + # + # Called when we are are being set up but before starting + # + # --------------------------------------------------------------------------------------------- + sub initialize + { + my ( $self ) = @_; + + $self->config_( 'trayicon', 1 ); + + return 1; + } + + # --------------------------------------------------------------------------------------------- + # # prefork # *************** *** 66,69 **** --- 82,89 ---- { my ( $self ) = @_; + + if ( !$self->config_( 'trayicon' ) ) { + return 1; + } if ( !defined( $self->{getmessage__} ) ) { |