[popfile-commit] engine/Platform MSWin32.pm,1.22,1.23

[Manni H. <man...@us...>]

Update of /cvsroot/popfile/engine/Platform
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3417/Platform

Modified Files:
	MSWin32.pm 
Log Message:
Let the MSWin32 module use the status message facility. 

Remove font tag from language file.

Use labels for the descriptions.

Index: MSWin32.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Platform/MSWin32.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -d -r1.22 -r1.23
*** MSWin32.pm	1 Jan 2005 15:53:34 -0000	1.22
--- MSWin32.pm	16 Mar 2005 21:57:53 -0000	1.23
***************
*** 151,168 ****
      my ( $self, $name, $templ, $language, $form ) = @_;
  
      if ( $name eq 'windows_trayicon_and_console' ) {
  
          if ( defined($$form{windows_trayicon}) ) {
              $self->config_( 'trayicon', $$form{windows_trayicon} );
!             $templ->param( 'trayicon_feedback' => 1 );
          }
  
          if ( defined($$form{windows_console}) ) {
              $self->config_( 'console', $$form{windows_console} );
!             $templ->param( 'console_feedback' => 1 );
          }
      }
  
!    return '';
  }
  
--- 151,170 ----
      my ( $self, $name, $templ, $language, $form ) = @_;
  
+     my ( $status_message );
+ 
      if ( $name eq 'windows_trayicon_and_console' ) {
  
          if ( defined($$form{windows_trayicon}) ) {
              $self->config_( 'trayicon', $$form{windows_trayicon} );
!             $status_message = $$language{Windows_NextTime};
          }
  
          if ( defined($$form{windows_console}) ) {
              $self->config_( 'console', $$form{windows_console} );
!             $status_message = $$language{Windows_NextTime};
          }
      }
  
!    return ( $status_message, undef );
  }