No subject
Sun Dec 8 17:39:16 PST 2013
Modified Paths:
--------------
trunk/base/src/package1.0/portarchivefetch.tcl
trunk/base/src/package1.0/portdmg.tcl
trunk/base/src/package1.0/portdpkg.tcl
trunk/base/src/package1.0/portmdmg.tcl
trunk/base/src/package1.0/portmpkg.tcl
trunk/base/src/package1.0/portpkg.tcl
trunk/base/src/package1.0/portrpm.tcl
trunk/base/src/package1.0/portsrpm.tcl
trunk/base/src/package1.0/portunarchive.tcl
trunk/base/src/package1.0/tests/test.tcl
Modified: trunk/base/src/package1.0/portarchivefetch.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portarchivefetch.tcl 2014-01-25 16:46:33 UT=
C (rev 116445)
+++ trunk/base/src/package1.0/portarchivefetch.tcl 2014-01-25 16:48:01 UT=
C (rev 116446)
@@ -104,7 +104,7 @@
}
=20
# check if porturl itself points to an archive
- if {[file rootname [file tail $porturl]] =3D=3D [file rootname [get_=
portimage_name]] && [file extension $porturl] !=3D ""} {
+ if {[file rootname [file tail $porturl]] eq [file rootname [get_port=
image_name]] && [file extension $porturl] ne ""} {
lappend ret [string range $porturl 0 end-[string length [file ta=
il $porturl]]]:[string range [file extension $porturl] 1 end]
archive.subdir
}
@@ -186,7 +186,7 @@
if {${archivefetch.ignore_sslcert} !=3D "no"} {
lappend fetch_options "--ignore-ssl-cert"
}
- if {$portverbose =3D=3D "yes"} {
+ if {$portverbose eq "yes"} {
lappend fetch_options "-v"
}
set sorted no
@@ -194,7 +194,7 @@
set existing_archive [find_portarchive_path]
=20
foreach {url_var archive} $archivefetch_urls {
- if {![file isfile ${archivefetch.fulldestpath}/${archive}] && $e=
xisting_archive =3D=3D ""} {
+ if {![file isfile ${archivefetch.fulldestpath}/${archive}] && $e=
xisting_archive eq ""} {
ui_info "$UI_PREFIX [format [msgcat::mc "%s doesn't seem to =
exist in %s"] $archive ${archivefetch.fulldestpath}]"
if {![file writable ${archivefetch.fulldestpath}]} {
return -code error [format [msgcat::mc "%s must be writa=
ble"] ${archivefetch.fulldestpath}]
@@ -213,7 +213,7 @@
set failed_sites 0
unset -nocomplain fetched
foreach site $urlmap($url_var) {
- if {[string index $site end] !=3D "/"} {
+ if {[string index $site end] ne "/"} {
append site "/[option archive.subdir]"
} else {
append site [option archive.subdir]
@@ -280,7 +280,7 @@
}
return 0
}
- if {[info exists ports_binary_only] && $ports_binary_only =3D=3D "ye=
s"} {
+ if {[info exists ports_binary_only] && $ports_binary_only eq "yes"} =
{
return -code error "archivefetch failed for [option subport] @[o=
ption version]_[option revision][option portvariants]"
} else {
return 0
Modified: trunk/base/src/package1.0/portdmg.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portdmg.tcl 2014-01-25 16:46:33 UTC (rev 11=
6445)
+++ trunk/base/src/package1.0/portdmg.tcl 2014-01-25 16:48:01 UTC (rev 11=
6446)
@@ -91,13 +91,13 @@
}
=20
set hdiutil [findBinary hdiutil $portutil::autoconf::hdiutil_path]
- if {[system "$hdiutil create -quiet -fs HFS+ -volname ${imagename} -=
srcfolder ${pkgpath} ${tmp_image}"] !=3D ""} {
+ if {[system "$hdiutil create -quiet -fs HFS+ -volname ${imagename} -=
srcfolder ${pkgpath} ${tmp_image}"] ne ""} {
return -code error [format [msgcat::mc "Failed to create tempora=
ry image: %s"] ${imagename}]
}
- if {[system "$hdiutil convert ${tmp_image} -format UDCO -o ${final_i=
mage} -quiet"] !=3D ""} {
+ if {[system "$hdiutil convert ${tmp_image} -format UDCO -o ${final_i=
mage} -quiet"] ne ""} {
return -code error [format [msgcat::mc "Failed to convert to fin=
al image: %s"] ${final_image}]
}
- if {[system "$hdiutil internet-enable -quiet -yes ${final_image}"] !=
=3D ""} {
+ if {[system "$hdiutil internet-enable -quiet -yes ${final_image}"] n=
e ""} {
return -code error [format [msgcat::mc "Failed to internet-enabl=
e: %s"] ${final_image}]
}
file delete -force "${tmp_image}"
Modified: trunk/base/src/package1.0/portdpkg.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portdpkg.tcl 2014-01-25 16:46:33 UTC (rev 1=
16445)
+++ trunk/base/src/package1.0/portdpkg.tcl 2014-01-25 16:48:01 UTC (rev 1=
16446)
@@ -87,7 +87,7 @@
set controlfd [open [file join ${controlpath} control] w+]
=20
# Size, in kilobytes, of ${destpath}
- set pkg_installed-size [expr [dirSize ${destpath}] / 1024]
+ set pkg_installed-size [expr {[dirSize ${destpath}] / 1024}]
=20
# Create debian dependency list
if {[info exists dependencies]} {
@@ -97,12 +97,12 @@
}
=20
# Create dpkg version number
- if {[expr [option epoch] !=3D 0]} {
+ if {[expr {[option epoch] !=3D 0}]} {
set pkg_version "[option epoch]:[option version]"
} else {
set pkg_version "[option version]"
}
- if {[expr [option revision] !=3D 0]} {
+ if {[expr {[option revision] !=3D 0}]} {
append pkg_version "-[option revision]"
}
=20
@@ -146,7 +146,7 @@
}
=20
# An architecture-independent package
- if {$supported_archs =3D=3D "noarch"} {
+ if {$supported_archs eq "noarch"} {
set pkg_arch "all"
}
=20
Modified: trunk/base/src/package1.0/portmdmg.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portmdmg.tcl 2014-01-25 16:46:33 UTC (rev 1=
16445)
+++ trunk/base/src/package1.0/portmdmg.tcl 2014-01-25 16:48:01 UTC (rev 1=
16446)
@@ -91,13 +91,13 @@
}
=20
set hdiutil [findBinary hdiutil $portutil::autoconf::hdiutil_path]
- if {[system "$hdiutil create -quiet -fs HFS+ -volname ${imagename} -=
srcfolder ${mpkgpath} ${tmp_image}"] !=3D ""} {
+ if {[system "$hdiutil create -quiet -fs HFS+ -volname ${imagename} -=
srcfolder ${mpkgpath} ${tmp_image}"] ne ""} {
return -code error [format [msgcat::mc "Failed to create tempora=
ry image: %s"] ${imagename}]
}
- if {[system "$hdiutil convert ${tmp_image} -format UDCO -o ${final_i=
mage} -quiet"] !=3D ""} {
+ if {[system "$hdiutil convert ${tmp_image} -format UDCO -o ${final_i=
mage} -quiet"] ne ""} {
return -code error [format [msgcat::mc "Failed to convert to fin=
al image: %s"] ${final_image}]
}
- if {[system "$hdiutil internet-enable -quiet -yes ${final_image}"] !=
=3D ""} {
+ if {[system "$hdiutil internet-enable -quiet -yes ${final_image}"] n=
e ""} {
return -code error [format [msgcat::mc "Failed to internet-enabl=
e: %s"] ${final_image}]
}
file delete -force "${tmp_image}"
Modified: trunk/base/src/package1.0/portmpkg.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portmpkg.tcl 2014-01-25 16:46:33 UTC (rev 1=
16445)
+++ trunk/base/src/package1.0/portmpkg.tcl 2014-01-25 16:48:01 UTC (rev 1=
16446)
@@ -91,7 +91,7 @@
=20
foreach depspec $depends {
set dep [_get_dep_port $depspec]
- if {$dep !=3D ""} {
+ if {$dep ne ""} {
eval "lappend result [make_dependency_list $dep $destination=
]"
}
}
@@ -272,7 +272,7 @@
proc portmpkg::mpkg_write_info_plist {infofile portname portversion port=
revision destination dependencies} {
set vers [split $portversion "."]
=20
- if {[string index $destination end] !=3D "/"} {
+ if {[string index $destination end] ne "/"} {
append destination /
}
=20
Modified: trunk/base/src/package1.0/portpkg.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portpkg.tcl 2014-01-25 16:46:33 UTC (rev 11=
6445)
+++ trunk/base/src/package1.0/portpkg.tcl 2014-01-25 16:48:01 UTC (rev 11=
6446)
@@ -51,7 +51,7 @@
default package.resources {${workpath}/pkg_resources}
default package.scripts {${workpath}/pkg_scripts}
# Need productbuild to make flat packages really work
-default package.flat {[expr [vercmp $macosx_deployment_target 10.6] =
>=3D 0]}
+default package.flat {[expr {[vercmp $macosx_deployment_target 10.6]=
>=3D 0}]}
=20
set_ui_prefix
=20
@@ -314,7 +314,7 @@
=20
proc portpkg::write_welcome_html {filename portname portepoch portversio=
n portrevision long_description description homepage} {
set fd [open ${filename} w+]
- if {$long_description =3D=3D ""} {
+ if {$long_description eq ""} {
set long_description $description
}
=20
@@ -350,7 +350,7 @@
<font face=3D\"Helvetica\">${long_description}</font>
<p>"
=20
- if {$homepage !=3D ""} {
+ if {$homepage ne ""} {
puts $fd "<font face=3D\"Helvetica\"><a href=3D\"${homepage}\">$=
{homepage}</a></font><p>"
}
=20
@@ -366,10 +366,10 @@
if {[catch {set numFiles [llength [split [exec [findBinary lsbom $po=
rtutil::autoconf::lsbom_path] -s ${pkgpath}/Contents/Archive.bom] "\n"]]}=
result]} {
return -code error [format [msgcat::mc "Reading package bom fail=
ed: %s"] $result]
}
- if {[catch {set compressedSize [expr [dirSize ${pkgpath}] / 1024]} r=
esult]} {
+ if {[catch {set compressedSize [expr {[dirSize ${pkgpath}] / 1024}]}=
result]} {
return -code error [format [msgcat::mc "Error determining compre=
ssed size: %s"] $result]
}
- if {[catch {set installedSize [expr [dirSize ${destpath}] / 1024]} r=
esult]} {
+ if {[catch {set installedSize [expr {[dirSize ${destpath}] / 1024}]}=
result]} {
return -code error [format [msgcat::mc "Error determining instal=
led size: %s"] $result]
}
if {[catch {set infoSize [file size ${pkgpath}/Contents/Info.plist]}=
result]} {
@@ -503,11 +503,11 @@
# subtracted, otherwise subtract 'a'. Add 1 to the value
# so that 'a' and 'A' are mapped to 1, not 0.
if {$ord < $ord_a} {
- set j [expr $ord - $ord_A + 1]
+ set j [expr {$ord - $ord_A + 1}]
} else {
- set j [expr $ord - $ord_a + 1]
+ set j [expr {$ord - $ord_a + 1}]
}
- set i [expr 26*$i + $j]
+ set i [expr {26*$i + $j}]
}
lappend vs $i
}
Modified: trunk/base/src/package1.0/portrpm.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portrpm.tcl 2014-01-25 16:46:33 UTC (rev 11=
6445)
+++ trunk/base/src/package1.0/portrpm.tcl 2014-01-25 16:48:01 UTC (rev 11=
6446)
@@ -81,7 +81,7 @@
}
=20
set rpmbuildarch ""
- if {$supported_archs =3D=3D "noarch"} {
+ if {$supported_archs eq "noarch"} {
set rpmbuildarch "--target noarch"
} elseif {[variant_exists universal] && [variant_isset universal]} {
set rpmbuildarch "--target fat"
@@ -227,7 +227,7 @@
URL: ${homepage}
BuildRoot: ${destroot}
AutoReq: no"
- if {[expr ${epoch} !=3D 0]} {
+ if {[expr {${epoch} !=3D 0}]} {
puts $specfd "Epoch: ${epoch}"
}
if {[llength ${dependencies}] !=3D 0} {
Modified: trunk/base/src/package1.0/portsrpm.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portsrpm.tcl 2014-01-25 16:46:33 UTC (rev 1=
16445)
+++ trunk/base/src/package1.0/portsrpm.tcl 2014-01-25 16:48:01 UTC (rev 1=
16446)
@@ -224,10 +224,10 @@
URL: ${homepage}
BuildRoot: %{_tmppath}/%{name}-%{version}-root
Source0: ${portname}-Portfile"
- if {$zip !=3D ""} {
+ if {$zip ne ""} {
puts $specfd "Source1: $zip"
}
- if {[expr ${epoch} !=3D 0]} {
+ if {[expr {${epoch} !=3D 0}]} {
puts $specfd "Epoch: ${epoch}"
}
set first 2
@@ -238,7 +238,7 @@
puts -nonewline $specfd "Source${count}: "
if {![info exists $fetch_urls]} {
foreach {url_var distfile} ${fetch_urls} {
- if {[string equal $distfile $file]} {
+ if {$distfile eq $file} {
global portfetch::$url_var master_sites
set site [lindex [set $url_var] 0]
set file [portfetch::assemble_url $site $distfile]
@@ -259,7 +259,7 @@
}
}
set wrap_description [word_wrap ${long_description} 72]
- if {$zip !=3D ""} {
+ if {$zip ne ""} {
set and "-a 1"
} else {
set and ""
Modified: trunk/base/src/package1.0/portunarchive.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/portunarchive.tcl 2014-01-25 16:46:33 UTC (=
rev 116445)
+++ trunk/base/src/package1.0/portunarchive.tcl 2014-01-25 16:48:01 UTC (=
rev 116446)
@@ -71,14 +71,14 @@
set skipped 0
if {[check_statefile target org.macports.unarchive $target_state_fd]=
} {
return 0
- } elseif {[info exists ports_source_only] && $ports_source_only =3D=3D=
"yes"} {
+ } elseif {[info exists ports_source_only] && $ports_source_only eq "=
yes"} {
ui_debug "Skipping unarchive ($subport) since source-only is set=
"
set skipped 1
} elseif {[check_statefile target org.macports.destroot $target_stat=
e_fd]
&& [file isdirectory $destroot]} {
ui_debug "Skipping unarchive ($subport) since destroot completed=
"
set skipped 1
- } elseif {[info exists ports_force] && $ports_force =3D=3D "yes"} {
+ } elseif {[info exists ports_force] && $ports_force eq "yes"} {
ui_debug "Skipping unarchive ($subport) since force is set"
set skipped 1
} else {
@@ -88,7 +88,7 @@
if {${unarchive.path} !=3D ""} {
ui_debug "Found [string toupper ${unarchive.type}] archive: =
${unarchive.path}"
} else {
- if {[info exists ports_binary_only] && $ports_binary_only =3D=
=3D "yes"} {
+ if {[info exists ports_binary_only] && $ports_binary_only eq=
"yes"} {
return -code error "Archive for ${subport} ${version}_${=
revision}${portvariants} not found, required when binary-only is set!"
} else {
ui_debug "Skipping unarchive ($subport) since no suitabl=
e archive found"
Modified: trunk/base/src/package1.0/tests/test.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/base/src/package1.0/tests/test.tcl 2014-01-25 16:46:33 UTC (rev=
116445)
+++ trunk/base/src/package1.0/tests/test.tcl 2014-01-25 16:48:01 UTC (rev=
116446)
@@ -15,7 +15,7 @@
}
=20
proc print_help {arg} {
- if { $arg =3D=3D "tests" } {
+ if { $arg eq "tests" } {
puts "The list of available tests is:"
cd tests
set test_suite [glob *.test]
@@ -34,11 +34,11 @@
=20
# Process args
foreach arg $argv {
- if { $arg =3D=3D "-h" || $arg =3D=3D "-help" } {
+ if { $arg eq "-h" || $arg eq "-help" } {
print_help ""
exit 0
- } elseif { $arg =3D=3D "-debug" } {
- set index [expr [lsearch $argv $arg] + 1]
+ } elseif { $arg eq "-debug" } {
+ set index [expr {[lsearch $argv $arg] + 1}]
set level [lindex $argv $index]
if { $level >=3D 0 && $level <=3D 3 } {
append arguments "-debug " $level
@@ -46,32 +46,32 @@
puts "Invalid debug level."
exit 1
}
- } elseif { $arg =3D=3D "-t" } {
- set index [expr [lsearch $argv $arg] + 1]
+ } elseif { $arg eq "-t" } {
+ set index [expr {[lsearch $argv $arg] + 1}]
set test_name [lindex $argv $index]
set no 0
cd tests
set test_suite [glob *.test]
foreach test $test_suite {
if { $test_name !=3D $test } {
- set no [expr $no + 1]
+ set no [expr {$no + 1}]
}
}
if { $no =3D=3D [llength $test_suite] } {
print_help tests
exit 1
}
- } elseif { $arg =3D=3D "-l" } {
+ } elseif { $arg eq "-l" } {
print_help tests
exit 0
- } elseif { $arg =3D=3D "-nocolor" } {
+ } elseif { $arg eq "-nocolor" } {
set color_out "no"
}
}
=20
=20
# Run tests
-if { $test_name !=3D ""} {
+if { $test_name ne ""} {
set result [eval exec $tcl $test_name $arguments 2>@stderr]
puts $result
=20
@@ -109,7 +109,7 @@
if { $fail !=3D 0 } { set err "yes" }
=20
set out ""
- if { ($fail !=3D 0 || $skip !=3D 0) && $color_out =3D=3D "" } {
+ if { ($fail !=3D 0 || $skip !=3D 0) && $color_out eq "" } {
# Color failed tests.
append out "\x1b\[1;31mTotal:" $total " Passed:" $pass " Fai=
led:" $fail " Skipped:" $skip " \x1b\[0m" $test
} else {
@@ -124,13 +124,13 @@
puts $out
}
if { $fail !=3D 0 } {
- set end [expr [string first $test $result 0] - 1]
+ set end [expr {[string first $test $result 0] - 1}]
puts [string range $result 0 $end]
}
}
}
=20
# Return 1 if errors were found.
-if {$err !=3D ""} { exit 1 }
+if {$err ne ""} { exit 1 }
=20
return 0
--XTy5n1g1ehK
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns=3D"http://www.w3.org/1999/xhtml">
<head><meta http-equiv=3D"content-type" content=3D"text/html; charset=3Du=
tf-8" />
<title>[116446] trunk/base/src/package1.0</title>
</head>
<body>
<style type=3D"text/css"><!--
#msg dl.meta { border: 1px #006 solid; background: #369; padding: 6px; co=
lor: #fff; }
#msg dl.meta dt { float: left; width: 6em; font-weight: bold; }
#msg dt:after { content:':';}
#msg dl, #msg dt, #msg ul, #msg li, #header, #footer, #logmsg { font-fami=
ly: verdana,arial,helvetica,sans-serif; font-size: 10pt; }
#msg dl a { font-weight: bold}
#msg dl a:link { color:#fc3; }
#msg dl a:active { color:#ff0; }
#msg dl a:visited { color:#cc6; }
h3 { font-family: verdana,arial,helvetica,sans-serif; font-size: 10pt; fo=
nt-weight: bold; }
#msg pre { overflow: auto; background: #ffc; border: 1px #fa0 solid; padd=
ing: 6px; }
#logmsg { background: #ffc; border: 1px #fa0 solid; padding: 1em 1em 0 1e=
m; }
#logmsg p, #logmsg pre, #logmsg blockquote { margin: 0 0 1em 0; }
#logmsg p, #logmsg li, #logmsg dt, #logmsg dd { line-height: 14pt; }
#logmsg h1, #logmsg h2, #logmsg h3, #logmsg h4, #logmsg h5, #logmsg h6 { =
margin: .5em 0; }
#logmsg h1:first-child, #logmsg h2:first-child, #logmsg h3:first-child, #=
logmsg h4:first-child, #logmsg h5:first-child, #logmsg h6:first-child { m=
argin-top: 0; }
#logmsg ul, #logmsg ol { padding: 0; list-style-position: inside; margin:=
0 0 0 1em; }
#logmsg ul { text-indent: -1em; padding-left: 1em; }#logmsg ol { text-ind=
ent: -1.5em; padding-left: 1.5em; }
#logmsg > ul, #logmsg > ol { margin: 0 0 1em 0; }
#logmsg pre { background: #eee; padding: 1em; }
#logmsg blockquote { border: 1px solid #fa0; border-left-width: 10px; pad=
ding: 1em 1em 0 1em; background: white;}
#logmsg dl { margin: 0; }
#logmsg dt { font-weight: bold; }
#logmsg dd { margin: 0; padding: 0 0 0.5em 0; }
#logmsg dd:before { content:'\00bb';}
#logmsg table { border-spacing: 0px; border-collapse: collapse; border-to=
p: 4px solid #fa0; border-bottom: 1px solid #fa0; background: #fff; }
#logmsg table th { text-align: left; font-weight: normal; padding: 0.2em =
0.5em; border-top: 1px dotted #fa0; }
#logmsg table td { text-align: right; border-top: 1px dotted #fa0; paddin=
g: 0.2em 0.5em; }
#logmsg table thead th { text-align: center; border-bottom: 1px solid #fa=
0; }
#logmsg table th.Corner { text-align: left; }
#logmsg hr { border: none 0; border-top: 2px dashed #fa0; height: 1px; }
#header, #footer { color: #fff; background: #636; border: 1px #300 solid;=
padding: 6px; }
#patch { width: 100%; }
#patch h4 {font-family: verdana,arial,helvetica,sans-serif;font-size:10pt=
;padding:8px;background:#369;color:#fff;margin:0;}
#patch .propset h4, #patch .binary h4 {margin:0;}
#patch pre {padding:0;line-height:1.2em;margin:0;}
#patch .diff {width:100%;background:#eee;padding: 0 0 10px 0;overflow:aut=
o;}
#patch .propset .diff, #patch .binary .diff {padding:10px 0;}
#patch span {display:block;padding:0 10px;}
#patch .modfile, #patch .addfile, #patch .delfile, #patch .propset, #patc=
h .binary, #patch .copfile {border:1px solid #ccc;margin:10px 0;}
#patch ins {background:#dfd;text-decoration:none;display:block;padding:0 =
10px;}
#patch del {background:#fdd;text-decoration:none;display:block;padding:0 =
10px;}
#patch .lines, .info {color:#888;background:#fff;}
--></style>
<div id=3D"msg">
<dl class=3D"meta">
<dt>Revision</dt> <dd><a href=3D"https://trac.macports.org/changeset/1164=
46">116446</a></dd>
<dt>Author</dt> <dd>cal at macports.org</dd>
<dt>Date</dt> <dd>2014-01-25 08:48:01 -0800 (Sat, 25 Jan 2014)</dd>
</dl>
<h3>Log Message</h3>
<pre>package1.0: Tcl cleanup
- use string comparisons instead of !=3D and =3D=3D where appropriate
- wrap expressions in braces to allow for bytecode compilation
More information about the macports-changes
mailing list