[21953] trunk/base/src/port1.0/portutil.tcl

[source_changes at macosforge.org]

Revision: 21953
          http://trac.macosforge.org/projects/macports/changeset/21953
Author:   eridius at macports.org
Date:     2007-02-12 01:16:29 -0800 (Mon, 12 Feb 2007)

Log Message:
-----------
Remove some unnecessary quotes in the remaining evals - eval will concat its args so they are unnecessary, and this way it will still syntax-highlight

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

Modified: trunk/base/src/port1.0/portutil.tcl
===================================================================
--- trunk/base/src/port1.0/portutil.tcl	2007-02-12 08:56:09 UTC (rev 21952)
+++ trunk/base/src/port1.0/portutil.tcl	2007-02-12 09:16:29 UTC (rev 21953)
@@ -160,7 +160,7 @@
 
 proc option_proc {option args} {
     global option_procs $option
-    eval "lappend option_procs($option) $args"
+    eval lappend option_procs($option) $args
     # Add a read trace to the variable, as the option procedures have no access to reads
     trace variable $option rwu option_proc_trace
 }
@@ -1074,39 +1074,39 @@
             makeuserproc userproc-post-${ident}-${target}-\${proc_index} \$args
         "
     }
-    eval "ditem_append $ditem provides $args"
+    eval ditem_append $ditem provides $args
 }
 
 proc target_requires {ditem args} {
-    eval "ditem_append $ditem requires $args"
+    eval ditem_append $ditem requires $args
 }
 
 proc target_uses {ditem args} {
-    eval "ditem_append $ditem uses $args"
+    eval ditem_append $ditem uses $args
 }
 
 proc target_deplist {ditem args} {
-    eval "ditem_append $ditem deplist $args"
+    eval ditem_append $ditem deplist $args
 }
 
 proc target_prerun {ditem args} {
-    eval "ditem_append $ditem prerun $args"
+    eval ditem_append $ditem prerun $args
 }
 
 proc target_postrun {ditem args} {
-    eval "ditem_append $ditem postrun $args"
+    eval ditem_append $ditem postrun $args
 }
 
 proc target_runtype {ditem args} {
-    eval "ditem_append $ditem runtype $args"
+    eval ditem_append $ditem runtype $args
 }
 
 proc target_state {ditem args} {
-    eval "ditem_append $ditem state $args"
+    eval ditem_append $ditem state $args
 }
 
 proc target_init {ditem args} {
-    eval "ditem_append $ditem init $args"
+    eval ditem_append $ditem init $args
 }
 
 ##### variant class #####

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20070212/ba25cea7/attachment.html