cbklib

Check-in [2dd7444328]
Login

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
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to softwareupdate/softwareupdate.tcl.

    81     81   	dom parse $xml sparkledata
    82     82   	set versionnumber [string trim [$sparkledata selectNodes -namespaces [list x "http://www.andymatuschak.org/xml-namespaces/sparkle"] {string(//enclosure/@x:version)}] .0]
    83     83   
    84     84   	set changedata [$sparkledata selectNodes {string(//description/text())}]
    85     85   
    86     86   	set minOS [$sparkledata selectNodes -namespaces [list x "http://www.andymatuschak.org/xml-namespaces/sparkle"] {string(//x:minimumSystemVersion)}]
    87     87   
           88  +
           89  +	if {[tk windowingsystem] eq "aqua"] {
    88     90   	set hostOS [exec sw_vers -productVersion]
    89     91   
    90     92   	if {![package vsatisfies $hostOS $minOS]} {
    91     93   	    tk_messageBox -icon warning -message "Error!" -detail "$appname is not supported on Mac OS X $hostOS. The minimum supported OS version is $minOS." 
    92     94   	    return
           95  +	}
    93     96   	}
    94     97   	
    95     98   	if {[expr $currentversion < $versionnumber]} {
    96     99   	    softwareupdate::updatePitch
    97    100   	} else {
    98    101   	    softwareupdate::upToDate
    99    102   	}