[popfile-commit] engine/UI HTML.pm,1.74,1.75

[<jgr...@us...>]

Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1:/tmp/cvs-serv11068/UI

Modified Files:
	HTML.pm 
Log Message:
Improved the handling of failure to open the POP3 or HTTP ports by writing out a comprehensive error message explaining the situation

Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.74
retrieving revision 1.75
diff -C2 -d -r1.74 -r1.75
*** HTML.pm	20 Feb 2003 16:25:54 -0000	1.74
--- HTML.pm	21 Feb 2003 18:22:04 -0000	1.75
***************
*** 166,170 ****
                                       LocalPort => $self->{configuration}->{configuration}{ui_port},
                                       Listen    => SOMAXCONN,
!                                      Reuse     => 1 ) or return 0;
  
      $self->{selector} = new IO::Select( $self->{server} );
--- 166,184 ----
                                       LocalPort => $self->{configuration}->{configuration}{ui_port},
                                       Listen    => SOMAXCONN,
!                                      Reuse     => 1 );
! 
!     if ( !defined( $self->{server} ) ) {
!     	print <<EOM;
! 
! \nCouldn't start the HTTP interface because POPFile could not bind to the 
! HTTP port $self->{configuration}->{configuration}{ui_port}. This could be because there is another service 
! using that port or because you do not have the right privileges on 
! your system (On Unix systems this can happen if you are not root 
! and the port you specified is less than 1024).
! 
! EOM
! 
! 	return 0;
!     }
  
      $self->{selector} = new IO::Select( $self->{server} );