[popfile-commit] engine/tests TestConfiguration.tst,1.5,1.6

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

Update of /cvsroot/popfile/engine/tests
In directory sc8-pr-cvs1:/tmp/cvs-serv4451/tests

Modified Files:
	TestConfiguration.tst 
Log Message:
Restore POPFile::Configuration test suite to 100% line coverage with test for load_configuration

Index: TestConfiguration.tst
===================================================================
RCS file: /cvsroot/popfile/engine/tests/TestConfiguration.tst,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** TestConfiguration.tst	15 Jul 2003 02:49:22 -0000	1.5
--- TestConfiguration.tst	26 Jul 2003 17:32:27 -0000	1.6
***************
*** 7,10 ****
--- 7,12 ----
  # ---------------------------------------------------------------------------------------------
  
+ unlink 'popfile.cfg';
+ 
  use POPFile::Configuration;
  use POPFile::MQ;
***************
*** 65,69 ****
  test_assert( !$c->check_pid_() );
  
- 
  # disable logging
  
--- 67,70 ----
***************
*** 104,107 ****
--- 105,143 ----
  close STDERR;
  $c->stop();
+ 
+ # Check that the popfile.cfg was written
+ 
+ open FILE, "<popfile.cfg";
+ my $line = <FILE>;
+ test_assert_regexp( $line, 'GLOBAL_debug 0' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'GLOBAL_download_count 0' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'GLOBAL_msgdir messages/' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'GLOBAL_subject 1' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'GLOBAL_timeout 60' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'GLOBAL_xpl 1' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'GLOBAL_xtc 1' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'config_piddir ../tests/' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'logger_logdir ./' );
+ $line = <FILE>;
+ test_assert_regexp( $line, 'testparam testvalue' );
+ $line = <FILE>;
+ close FILE;
+ 
+ # Now add a parameter and reload the configuration
+ 
+ open FILE, ">>popfile.cfg";
+ print FILE "testparam2 testvalue2\n";
+ close FILE;
+ 
+ $c->load_configuration();
+ test_assert_equal( $c->parameter( 'testparam2' ), 'testvalue2' );
  
  # Check that parameter upgrading works