cvs commit: modperl-2.0/src/modules/perl modperl_callback.c

[dougm]

dougm       01/05/22 15:13:28

  Modified:    src/modules/perl modperl_callback.c
  Log:
  bug fix: callbacks that returned DECLINED were changed to OK
  
  Revision  Changes    Path
  1.42      +2 -1      modperl-2.0/src/modules/perl/modperl_callback.c
  
  Index: modperl_callback.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_callback.c,v
  retrieving revision 1.41
  retrieving revision 1.42
  diff -u -r1.41 -r1.42
  --- modperl_callback.c        2001/04/19 17:57:14     1.41
  +++ modperl_callback.c        2001/05/22 22:13:20     1.42
  @@ -59,7 +59,8 @@
       else {
           status = POPi;
           /* assume OK for non-http status codes and for 200 (HTTP_OK) */
  -        if ((status < 100) || (status == 200) || (status > 600)) {
  +        if (((status > 0) && (status < 100)) ||
  +            (status == 200) || (status > 600)) {
               status = OK;
           }
       }