[45201] trunk/base/src/macports1.0/macports.tcl

[jmr at macports.org]

Revision: 45201
          http://trac.macports.org/changeset/45201
Author:   jmr at macports.org
Date:     2009-01-10 10:26:17 -0800 (Sat, 10 Jan 2009)
Log Message:
-----------
Make a reasonable guess instead of hard failing when there is no [default] tag in sources.conf.

Modified Paths:
--------------
    trunk/base/src/macports1.0/macports.tcl

Modified: trunk/base/src/macports1.0/macports.tcl
===================================================================
--- trunk/base/src/macports1.0/macports.tcl	2009-01-10 17:52:00 UTC (rev 45200)
+++ trunk/base/src/macports1.0/macports.tcl	2009-01-10 18:26:17 UTC (rev 45201)
@@ -429,7 +429,8 @@
     # [macports::getportresourcepath] fails when the first source doesn't
     # contain _resources.
     if {![info exists sources_default]} {
-        return -code error "No default port source specified in $sources_conf"
+        ui_warn "No default port source specified in $sources_conf, using last source as default"
+        set sources_default [lindex $sources end]
     }
 
     if {![info exists sources]} {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090110/51c78be0/attachment.html>