cvs commit: modperl-2.0/t/apache constants.t

[dougm]

dougm       01/04/11 16:02:59

  Modified:    t/apache constants.t
  Log:
  test usage
  
  Revision  Changes    Path
  1.2       +4 -1      modperl-2.0/t/apache/constants.t
  
  Index: constants.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/apache/constants.t,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- constants.t       2001/04/11 22:54:47     1.1
  +++ constants.t       2001/04/11 23:02:57     1.2
  @@ -7,7 +7,7 @@
   use Apache::Const -compile => qw(DECLINED :http :common TAKE23);
   use Apache::Const; #defaults to :common
   
  -plan tests => 10;
  +plan tests => 11;
   
   ok AUTH_REQUIRED == 401;
   ok OK == 0;
  @@ -28,3 +28,6 @@
   
   ok $@;
   
  +eval { Apache::Const::compile() };
  +
  +ok $@;