Revision
119616
Author
snc@macports.org
Date
2014-05-02 07:22:26 -0700 (Fri, 02 May 2014)

Log Message

base: remove braces from ::file attributes

Modified Paths

Diff

Modified: trunk/base/src/registry2.0/portimage.tcl (119615 => 119616)


--- trunk/base/src/registry2.0/portimage.tcl	2014-05-02 14:18:04 UTC (rev 119615)
+++ trunk/base/src/registry2.0/portimage.tcl	2014-05-02 14:22:26 UTC (rev 119616)
@@ -268,10 +268,10 @@
                 ::file mkdir $dstfile
                 # fix attributes on the directory.
                 if {[getuid] == 0} {
-                    ::file attributes {$dstfile} {*}[::file attributes $srcfile]
+                    ::file attributes $dstfile {*}[::file attributes $srcfile]
                 } else {
                     # not root, so can't set owner/group
-                    ::file attributes {$dstfile} -permissions {*}[::file attributes $srcfile -permissions]
+                    ::file attributes $dstfile -permissions {*}[::file attributes $srcfile -permissions]
                 }
                 # set mtime on installed element
                 ::file mtime $dstfile [::file mtime $srcfile]