Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | tweak softwareupdate |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: | 2dd7444328e86d76e3031d6ec7a84afcb8fe2be2 |
| User & Date: | admin 2015-09-20 02:09:38 |
Context
|
2015-09-20
| ||
| 05:07 | Minor updates check-in: a75134832a user: admin tags: trunk | |
| 02:09 | tweak softwareupdate check-in: 2dd7444328 user: admin tags: trunk | |
|
2015-09-16
| ||
| 10:44 | Tweak libs for Windows support check-in: 8d57bbfd5f user: admin tags: trunk | |
Changes
Changes to softwareupdate/softwareupdate.tcl.
81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 |
dom parse $xml sparkledata
set versionnumber [string trim [$sparkledata selectNodes -namespaces [list x "http://www.andymatuschak.org/xml-namespaces/sparkle"] {string(//enclosure/@x:version)}] .0]
set changedata [$sparkledata selectNodes {string(//description/text())}]
set minOS [$sparkledata selectNodes -namespaces [list x "http://www.andymatuschak.org/xml-namespaces/sparkle"] {string(//x:minimumSystemVersion)}]
set hostOS [exec sw_vers -productVersion]
if {![package vsatisfies $hostOS $minOS]} {
tk_messageBox -icon warning -message "Error!" -detail "$appname is not supported on Mac OS X $hostOS. The minimum supported OS version is $minOS."
return
}
if {[expr $currentversion < $versionnumber]} {
softwareupdate::updatePitch
} else {
softwareupdate::upToDate
}
|
> > > |
81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 |
dom parse $xml sparkledata
set versionnumber [string trim [$sparkledata selectNodes -namespaces [list x "http://www.andymatuschak.org/xml-namespaces/sparkle"] {string(//enclosure/@x:version)}] .0]
set changedata [$sparkledata selectNodes {string(//description/text())}]
set minOS [$sparkledata selectNodes -namespaces [list x "http://www.andymatuschak.org/xml-namespaces/sparkle"] {string(//x:minimumSystemVersion)}]
if {[tk windowingsystem] eq "aqua"] {
set hostOS [exec sw_vers -productVersion]
if {![package vsatisfies $hostOS $minOS]} {
tk_messageBox -icon warning -message "Error!" -detail "$appname is not supported on Mac OS X $hostOS. The minimum supported OS version is $minOS."
return
}
}
if {[expr $currentversion < $versionnumber]} {
softwareupdate::updatePitch
} else {
softwareupdate::upToDate
}
|