[119681] trunk/base/src/port1.0/portlint.tcl

cal at macports.org cal at macports.org
Sat May 3 14:56:51 PDT 2014


Revision: 119681
          https://trac.macports.org/changeset/119681
Author:   cal at macports.org
Date:     2014-05-03 14:56:51 -0700 (Sat, 03 May 2014)
Log Message:
-----------
base/port1.0/portlint.tcl: Replace eval with argument expansion

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

Modified: trunk/base/src/port1.0/portlint.tcl
===================================================================
--- trunk/base/src/port1.0/portlint.tcl	2014-05-03 21:55:18 UTC (rev 119680)
+++ trunk/base/src/port1.0/portlint.tcl	2014-05-03 21:56:51 UTC (rev 119681)
@@ -459,11 +459,21 @@
     }
 
     set all_depends {}
-    if {[info exists depends_fetch]} { eval "lappend all_depends $depends_fetch" }
-    if {[info exists depends_extract]} { eval "lappend all_depends $depends_extract" }
-    if {[info exists depends_lib]} { eval "lappend all_depends $depends_lib" }
-    if {[info exists depends_build]} { eval "lappend all_depends $depends_build" }
-    if {[info exists depends_run]} { eval "lappend all_depends $depends_run" }
+    if {[info exists depends_fetch]} {
+		lappend all_depends {*}$depends_fetch
+	}
+    if {[info exists depends_extract]} {
+		lappend all_depends {*}$depends_extract
+	}
+    if {[info exists depends_lib]} {
+		lappend all_depends {*}$depends_lib
+	}
+    if {[info exists depends_build]} {
+		lappend all_depends {*}$depends_build
+	}
+    if {[info exists depends_run]} {
+		lappend all_depends {*}$depends_run
+	}
     foreach depspec $all_depends {
         set dep [lindex [split $depspec :] end]
         if {[catch {set res [mport_lookup $dep]} error]} {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20140503/f381fd72/attachment.html>


More information about the macports-changes mailing list