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

[jmpp at macports.org]

Revision: 43263
          http://trac.macports.org/changeset/43263
Author:   jmpp at macports.org
Date:     2008-12-07 14:37:11 -0800 (Sun, 07 Dec 2008)
Log Message:
-----------
Whitespace cleanup, proper indenting. No functional changes.

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-12-07 22:17:44 UTC (rev 43262)
+++ trunk/base/src/macports1.0/macports.tcl	2008-12-07 22:37:11 UTC (rev 43263)
@@ -866,7 +866,7 @@
     }
     cd $fetchdir
     if {[catch {exec tar -zxf $fetchfile} result]} {
-    return -code error "Port extract failed: $result"
+        return -code error "Port extract failed: $result"
     }
     if {[regexp {(.+).tgz} $fetchfile match portdir] != 1} {
         return -code error "Can't decipher portdir from $fetchfile"
@@ -1011,8 +1011,8 @@
 
     # evaluate the variants
     if {[$workername eval eval_variants variations] != 0} {
-    mportclose $mport
-    error "Error evaluating variants"
+        mportclose $mport
+        error "Error evaluating variants"
     }
 
     ditem_key $mport provides [$workername eval return \$portname]
@@ -1047,7 +1047,7 @@
             foreach port [lsort -increasing -unique [readdir $pathToCategory]] {
                 set pathToPort [file join $pathToCategory $port]
                 if {[file isdirectory $pathToPort] &&
-                    [file exists [file join $pathToPort "Portfile"]]} {
+                  [file exists [file join $pathToPort "Portfile"]]} {
                     # Call the function.
                     $func [file join $category $port]
                     
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20081207/710eef7c/attachment.html>