[136720] trunk/dports/_resources/port1.0/group/select-1.0.tcl

[larryv at macports.org]

Revision: 136720
          https://trac.macports.org/changeset/136720
Author:   larryv at macports.org
Date:     2015-05-24 21:31:24 -0700 (Sun, 24 May 2015)
Log Message:
-----------
select-1.0: Sundry non-functional changes

Modified Paths:
--------------
    trunk/dports/_resources/port1.0/group/select-1.0.tcl

Modified: trunk/dports/_resources/port1.0/group/select-1.0.tcl
===================================================================
--- trunk/dports/_resources/port1.0/group/select-1.0.tcl	2015-05-25 04:09:13 UTC (rev 136719)
+++ trunk/dports/_resources/port1.0/group/select-1.0.tcl	2015-05-25 04:31:24 UTC (rev 136720)
@@ -35,17 +35,18 @@
 
 options select.group select.file
 
-default select.group ""
-default select.file ""
+default select.group {}
+default select.file {}
 
 namespace eval select {}
 
 proc select::install {group file {name ""}} {
-    global prefix destroot frameworks_dir applications_dir developer_dir
+    global applications_dir destroot developer_dir \
+            frameworks_dir prefix
 
     # Optional argument specifies file name
-    if {${name} == ""} {
-        set name [file tail ${file}]
+    if {$name eq ""} {
+        set name [file tail $file]
     }
 
     xinstall -m 755 -d ${destroot}${prefix}/etc/select/${group}
@@ -58,7 +59,7 @@
 }
 
 post-destroot {
-    if {${select.file} != "" && ${select.group} != ""} {
+    if {${select.file} ne "" && ${select.group} ne ""} {
         select::install ${select.group} ${select.file}
     } else {
         ui_debug "PortGroup select: select.group or select.file not set"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20150524/700d8c23/attachment.html>