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/docs/2.0/api/mod_perl-2.0/Apache Log.pod
Date Sat, 29 Jun 2002 19:16:06 GMT
stas        2002/06/29 12:16:05

  Modified:    src/docs/2.0/api/mod_perl-2.0/Apache Log.pod
  Log:
  the new version of DocSet doesn't tolerate duplicated #anchors
  
  Revision  Changes    Path
  1.2       +14 -8     modperl-docs/src/docs/2.0/api/mod_perl-2.0/Apache/Log.pod
  
  Index: Log.pod
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/docs/2.0/api/mod_perl-2.0/Apache/Log.pod,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- Log.pod	5 Jun 2002 09:13:37 -0000	1.1
  +++ Log.pod	29 Jun 2002 19:16:05 -0000	1.2
  @@ -12,12 +12,15 @@
     my $s = Apache->server;
     
     $s->log_error("server: log_error");
  -  
     $s->log_serror(Apache::LOG_MARK, Apache::LOG_ERR,
                    0, "log_serror logging at err level");
  -  
     $s->log_serror(Apache::LOG_MARK, Apache::LOG_DEBUG,
                    APR::ENOTIME, "debug print");
  +  Apache::Server->log_error("routine warning");
  +  
  +  Apache->warn("routine warning");
  +  Apache::warn("routine warning");
  +  Apache::Server->warn("routine warning");
   
     #in a handler
     #------------
  @@ -25,13 +28,14 @@
     sub handler{
         my $r = shift;
         $r->log_error("request: log_error");
  +      $r->warn("whoah!");
     
         my $rlog = $r->log;
         for my $level qw(emerg alert crit error warn notice info debug) {
             no strict 'refs';
             $rlog->$level($package, "request: $level log level");
         }
  -
  +  
         # can use server methods as well
         my $s = $r->server;
         $s->log_error("server: log_error");
  @@ -46,8 +50,6 @@
                        APR::ENOTIME, "fatal error");
   
         $s->warn('routine server warning');
  -      Apache->warn("routine warning");
  -
     }
   
   
  @@ -238,7 +240,7 @@
   
   Similar to C<$s-E<gt>log()>
   
  -=head2 emerg(), alert(), crit(), error(), warn(), notice(), info(), debug()
  +=head2 the emerg(), alert(), crit(), error(), warn(), notice(), info(), debug() methods
   
   Similar to the server's log functions with the same names.
   
  @@ -272,17 +274,21 @@
   
     $s->warn(@warnings);
   
  -C<$s-E<gt>warn()> is an alias to C<$s-E<gt>log-E<gt>warn()>.
  +is the same as:
   
  +  $s->log_error(Apache::LOG_MARK, Apache::LOG_WARNING|Apache::LOG_NOERRNO,
  +                0, @warnings)
   For example:
   
     $s->warn('routine server warning');
   
   =head2 C<Apache-E<gt>warn()>
   
  +=head2 C<Apache::warn()>
  +
     Apache->warn(@warnings);
   
  -C<Apache-E<gt>warn()> is an alias to C<$s-E<gt>log-E<gt>warn()>.
  +
   
   
   =cut
  
  
  

---------------------------------------------------------------------
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