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

[raimue at macports.org]

Revision: 56162
          http://trac.macports.org/changeset/56162
Author:   raimue at macports.org
Date:     2009-08-24 16:39:46 -0700 (Mon, 24 Aug 2009)
Log Message:
-----------
This cheap hack on os.major is only true for platform darwin

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

Modified: trunk/base/src/port1.0/portfetch.tcl
===================================================================
--- trunk/base/src/port1.0/portfetch.tcl	2009-08-24 23:10:32 UTC (rev 56161)
+++ trunk/base/src/port1.0/portfetch.tcl	2009-08-24 23:39:46 UTC (rev 56162)
@@ -160,14 +160,14 @@
 }
 
 proc portfetch::set_fetch_type {option action args} {
-    global os.major
+    global os.platform os.major
     if {[string equal ${action} "set"]} {
         switch $args {
             cvs {
                 depends_fetch-append bin:cvs:cvs
             }
             svn {
-                if {${os.major} >= 10} {
+                if {${os.platform} == "darwin" && ${os.major} >= 10} {
                     depends_fetch-append bin:svn:subversion
                 } else {
                     depends_fetch-append port:subversion
@@ -184,8 +184,8 @@
 }
 
 proc portfetch::find_svn_path {args} {
-    global prefix os.major
-    if {${os.major} >= 10} {
+    global prefix os.platform os.major
+    if {${os.platform} == "darwin" && ${os.major} >= 10} {
         return [findBinary svn $portutil::autoconf::svn_path]
     } else {
         return ${prefix}/bin/svn
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090824/ab8d0093/attachment-0001.html>