Differences From Artifact [f4bc5e5781]:
- File client/1.0/neutral/pkgd.eagle — part of check-in [25cb98f2fe] at 2016-12-23 00:15:46 on branch trunk — When storing the directory portion of 'info script', normalize it first. Fixes to the checkout directory handling for staging files in the package uploader client. (user: mistachkin, size: 56770) [annotate] [blame] [check-ins using]
To Artifact [290790a04d]:
- File client/1.0/neutral/pkgd.eagle — part of check-in [378a6a413c] at 2016-12-23 02:27:48 on branch trunk — For the package uploader, if the target platform is 'neutral' or the same as the current platform, use 'automatic' (an empty string) instead. (user: mistachkin, size: 56786) [annotate] [blame] [check-ins using]
| ︙ | |||
750 751 752 753 754 755 756 757 758 759 760 761 762 763 | 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 | + |
}
#
# NOTE: This procedure returns the name of the current platform. There are
# no arguments. An empty string will be returned if the name of the
# current platform cannot be determined for any reason.
#
# <internal>
proc getPlatform {} {
global tcl_platform
if {[info exists tcl_platform(platform)]} then {
set platform $tcl_platform(platform)
if {[info exists tcl_platform(machine)]} then {
|
| ︙ |