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

[Joshua Root]

simon at macports.org wrote:
> Revision: 42747
>           http://trac.macports.org/changeset/42747
> Author:   simon at macports.org
> Date:     2008-11-30 07:20:02 -0800 (Sun, 30 Nov 2008)
> Log Message:
> -----------
> base/src: Make sure the default port source is specified.
> 
> Modified Paths:
> --------------
>     trunk/base/src/macports1.0/macports.tcl
> 
> Modified: trunk/base/src/macports1.0/macports.tcl
> ===================================================================
> --- trunk/base/src/macports1.0/macports.tcl	2008-11-30 15:01:19 UTC (rev 42746)
> +++ trunk/base/src/macports1.0/macports.tcl	2008-11-30 15:20:02 UTC (rev 42747)
> @@ -432,6 +432,13 @@
>              }
>          }
>      }
> +    # Make sure the default port source is defined. Otherwise
> +    # [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"
> +    }
> +
>      if {![info exists sources]} {
>          if {[file isdirectory ports]} {
>              set sources "file://[pwd]/ports"

Presumably you discovered this the hard way? Is there a problem with the
upgrade script, or was this the result of a manual edit?

- Josh