[32722] trunk/base/src/port1.0/portfetch.tcl

[afb at macports.org]

Revision: 32722
          http://trac.macosforge.org/projects/macports/changeset/32722
Author:   afb at macports.org
Date:     2008-01-12 03:43:40 -0800 (Sat, 12 Jan 2008)

Log Message:
-----------
use remote timestamps when fetching (#12629)

Modified Paths:
--------------
    trunk/base/src/port1.0/portfetch.tcl

Modified: trunk/base/src/port1.0/portfetch.tcl
===================================================================
--- trunk/base/src/port1.0/portfetch.tcl	2008-01-12 10:34:00 UTC (rev 32721)
+++ trunk/base/src/port1.0/portfetch.tcl	2008-01-12 11:43:40 UTC (rev 32722)
@@ -433,7 +433,7 @@
 				ui_msg "$UI_PREFIX [format [msgcat::mc "Attempting to fetch %s from %s"] $distfile $site]"
 				set file_url [portfetch::assemble_url $site $distfile]
 				set effectiveURL ""
-				if {![catch {eval curl fetch --effective-url effectiveURL $fetch_options {$file_url} ${distpath}/${distfile}.TMP} result] &&
+				if {![catch {eval curl fetch --remote-time --effective-url effectiveURL $fetch_options {$file_url} ${distpath}/${distfile}.TMP} result] &&
 					![catch {system "mv ${distpath}/${distfile}.TMP ${distpath}/${distfile}"}]} {
 
 					# Special hack to check for sourceforge mirrors, which don't return a proper error code on failure

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20080112/30fee41a/attachment.html