[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apache-modperl-cvs
Subject:    cvs commit: modperl-2.0/t/modperl exit.t
From:       stas () apache ! org
Date:       2004-05-25 16:23:56
Message-ID: 20040525162356.18712.qmail () minotaur ! apache ! org
[Download RAW message or body]

stas        2004/05/25 09:23:56

  Modified:    t/modperl exit.t
  Log:
  fix regex
  
  Revision  Changes    Path
  1.3       +1 -1      modperl-2.0/t/modperl/exit.t
  
  Index: exit.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/modperl/exit.t,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -u -r1.2 -r1.3
  --- exit.t	25 May 2004 08:48:35 -0000	1.2
  +++ exit.t	25 May 2004 16:23:56 -0000	1.3
  @@ -18,7 +18,7 @@
   {
       my $exit_excpt = ModPerl::EXIT;
       my $body = GET_BODY_ASSERT("$location?eval");
  -    ok t_cmp(qr/^ModPerl::Util::exit: ($exit_excpt) exit was called/,
  +    ok t_cmp(qr/^ModPerl::Util::exit: \($exit_excpt\) exit was called/,
                $body,
                "exit in eval context");
   
  
  
  
[prev in list] [next in list] [prev in thread] [next in thread]