~showard314/ubuntu/karmic/r-base/remove_start_comments

« back to all changes in this revision

Viewing changes to src/modules/internet/internet.c

  • Committer: Bazaar Package Importer
  • Author(s): Dirk Eddelbuettel
  • Date: 2009-01-19 12:40:24 UTC
  • mfrom: (5.1.4 sid)
  • Revision ID: james.westby@ubuntu.com-20090119124024-abxsf4e0y7713w9m
Tags: 2.8.1-2
debian/control: Add another Build-Depends: exclusion for the 
'kfreebsd-i386 kfreebsd-amd64 hurd-i386' architecture to openjdk-6-jdk.
Thanks to Petr Salinger for the heads-up.               (Closes: 512324)

Show diffs side-by-side

added added

removed removed

Lines of Context:
335
335
        /* Use binary transfers */
336
336
        in = R_fopen(R_ExpandFileName(url+nh), (mode[2] == 'b') ? "rb" : "r");
337
337
        if(!in) {
338
 
#ifdef HAVE_STRERROR
339
338
            error(_("cannot open URL '%s', reason '%s'"),
340
339
                  url, strerror(errno));
341
 
#else
342
 
            error(_("cannot open URL '%s'"), url);
343
 
#endif
344
340
        }
345
341
 
346
342
        out = R_fopen(R_ExpandFileName(file), mode);
347
343
        if(!out) {
348
 
#ifdef HAVE_STRERROR
349
344
            error(_("cannot open destfile '%s', reason '%s'"),
350
345
                  file, strerror(errno));
351
 
#else
352
 
            error(_("cannot open destfile '%s'"), file);
353
 
#endif
354
346
        }
355
347
        while((n = fread(buf, 1, CPBUFSIZE, in)) > 0) {
356
348
            size_t res = fwrite(buf, 1, n, out);
375
367
 
376
368
        out = R_fopen(R_ExpandFileName(file), mode);
377
369
        if(!out) {
378
 
#ifdef HAVE_STRERROR
379
370
            error(_("cannot open destfile '%s', reason '%s'"),
380
371
                  file, strerror(errno));
381
 
#else
382
 
            error(_("cannot open destfile '%s'"), file);
383
 
#endif
384
372
        }
385
373
 
386
374
        R_Busy(1);
481
469
 
482
470
        out = R_fopen(R_ExpandFileName(file), mode);
483
471
        if(!out) {
484
 
#ifdef HAVE_STRERROR
485
472
            error(_("cannot open destfile '%s', reason '%s'"),
486
473
                  file, strerror(errno));
487
 
#else
488
 
            error(_("cannot open destfile '%s'"), file);
489
 
#endif
490
474
        }
491
475
 
492
476
        R_Busy(1);