perl-docs-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-docs/src/start/tips handler.pod
Date Fri, 26 Apr 2002 05:43:59 GMT
stas        02/04/25 22:43:59

  Modified:    src/start/tips handler.pod
  Log:
  use the shortcut for OK, after importing it
  
  Revision  Changes    Path
  1.6       +2 -2      modperl-docs/src/start/tips/handler.pod
  
  Index: handler.pod
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/start/tips/handler.pod,v
  retrieving revision 1.5
  retrieving revision 1.6
  diff -u -r1.5 -r1.6
  --- handler.pod	26 Apr 2002 01:48:45 -0000	1.5
  +++ handler.pod	26 Apr 2002 05:43:59 -0000	1.6
  @@ -18,7 +18,7 @@
     package My::Greeting;
     use strict;
     
  -  use Apache::Constants ();
  +  use Apache::Constants qw(OK);
     
     sub handler {
         my $r = shift;
  @@ -32,7 +32,7 @@
     The local time is $now.
     EOT
     
  -      return Apache::Constants::OK;
  +      return OK;
     }
     1; # modules must return true
   
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: docs-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: docs-cvs-help@perl.apache.org


Mime
View raw message