cvs commit: modperl/src/modules/perl Apache.xs

[dougm]

dougm       00/09/13 00:50:11

  Modified:    src/modules/perl Apache.xs
  Log:
  use proper macro
  
  Revision  Changes    Path
  1.108     +2 -2      modperl/src/modules/perl/Apache.xs
  
  Index: Apache.xs
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/Apache.xs,v
  retrieving revision 1.107
  retrieving revision 1.108
  diff -u -r1.107 -r1.108
  --- Apache.xs 2000/08/31 20:54:23     1.107
  +++ Apache.xs 2000/09/13 07:50:11     1.108
  @@ -968,7 +968,7 @@
   #endif
           SvCUR_set(buffer, nrd);
           *SvEND(buffer) = '\0';
  -        SvPOK_on(buffer);
  +        SvPOK_only(buffer);
           SvTAINTED_on(buffer);
       } 
       else {
  @@ -1001,7 +1001,7 @@
           XPUSHs(sv_2mortal(newSViv((long)nrd)));
           SvCUR_set(buffer, nrd);
           *SvEND(buffer) = '\0';
  -        SvPOK_on(buffer);
  +        SvPOK_only(buffer);
           SvTAINTED_on(buffer);
       } 
       else {