[21953] trunk/base/src/port1.0/portutil.tcl
source_changes at macosforge.org
source_changes at macosforge.org
Mon Feb 12 01:16:29 PST 2007
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
More information about the macports-changes
mailing list