joes        2004/07/02 10:08:30

  Modified:    glue/perl/xsbuilder/Apache/Upload Apache__Upload.h
  Log:
  Rename tempfile tempname to match docs
  
  Revision  Changes    Path
  1.11      +7 -7      
httpd-apreq-2/glue/perl/xsbuilder/Apache/Upload/Apache__Upload.h
  
  Index: Apache__Upload.h
  ===================================================================
  RCS file: 
/home/cvs/httpd-apreq-2/glue/perl/xsbuilder/Apache/Upload/Apache__Upload.h,v
  retrieving revision 1.10
  retrieving revision 1.11
  diff -u -r1.10 -r1.11
  --- Apache__Upload.h  2 Jul 2004 04:40:08 -0000       1.10
  +++ Apache__Upload.h  2 Jul 2004 17:08:30 -0000       1.11
  @@ -370,7 +370,7 @@
       XSRETURN(1);
   }
   
  -static XS(apreq_xs_upload_tempfile)
  +static XS(apreq_xs_upload_tempname)
   {
       dXSARGS;
       MAGIC *mg;
  @@ -381,10 +381,10 @@
       const char *path;
   
       if (items != 1 || !SvROK(ST(0)))
  -        Perl_croak(aTHX_ "Usage: $upload->temp_file()");
  +        Perl_croak(aTHX_ "Usage: $upload->tempname()");
   
       if (!(mg = mg_find(SvRV(ST(0)), PERL_MAGIC_ext)))
  -        Perl_croak(aTHX_ "$upload->temp_file(): can't find env");
  +        Perl_croak(aTHX_ "$upload->tempname(): can't find env");
   
       env = mg->mg_ptr;
       bb = apreq_xs_sv2param(ST(0))->bb;
  @@ -398,17 +398,17 @@
           s = apreq_file_mktemp(&file, apreq_env_pool(env), tmpdir);
   
           if (s != APR_SUCCESS) {
  -            apreq_log(APREQ_ERROR s, env, "apreq_xs_upload_temp_file:"
  +            apreq_log(APREQ_ERROR s, env, "apreq_xs_upload_tempname:"
                         "apreq_file_mktemp failed");
  -            Perl_croak(aTHX_ "$upload->temp_file: can't make tempfile");
  +            Perl_croak(aTHX_ "$upload->tempname: can't make tempfile");
           }
   
           s = apreq_brigade_fwrite(file, &len, bb);
   
           if (s != APR_SUCCESS) {
  -            apreq_log(APREQ_ERROR s, env, "apreq_xs_upload_fh:"
  +            apreq_log(APREQ_ERROR s, env, "apreq_xs_upload_tempname:"
                         "apreq_brigade_fwrite failed");
  -            Perl_croak(aTHX_ "$upload->temp_file: can't write brigade to 
tempfile");
  +            Perl_croak(aTHX_ "$upload->tempname: can't write brigade to 
tempfile");
           }
   
           last = apr_bucket_file_create(file, len, 0, bb->p, bb->bucket_alloc);
  
  
  

Reply via email to