Ignore:
Timestamp:
Jul 4, 2007, 6:16:19 AM (10 years ago)
Author:
eridius@…
Message:

Commit patch for #12224 - provide ${os.major} variable

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portutil.tcl

    r26682 r26693  
    486486# be more readable, and support arch and version specifics
    487487proc platform {args} {
    488     global all_variants PortInfo os.platform os.arch os.version
     488    global all_variants PortInfo os.platform os.arch os.version os.major
    489489   
    490490    set len [llength $args]
     
    523523    if {[info exists os.platform] && ${os.platform} == $os} {
    524524        set sel_platform $os
    525         if {[info exists os.version] && [info exists release]} {
    526             regexp {([0-9]*)[0-9\.]?} ${os.version} match major
    527             if {$major == $release } {
     525        if {[info exists os.major] && [info exists release]} {
     526            if {${os.major} == $release } {
    528527                set sel_platform ${sel_platform}_${release}
    529528            } else {
Note: See TracChangeset for help on using the changeset viewer.