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
|