Show
Ignore:
Timestamp:
04/06/10 21:06:53 (4 years ago)
Author:
turam
Message:

Properly map input pins to output pins (e.g. Winnov Videum); Select currently selected port in Port menu; Sort Device menu

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • vic/branches/mpeg4/tcl/ui-ctrlmenu.tcl

    r4706 r4761  
    799799} 
    800800 
     801proc compare {a b} { 
     802 
     803        return [string compare [$a nickname] [$b nickname]] 
     804 
     805    set a0 [$a nickname] 
     806 
     807    set b0 [$b nickname] 
     808 
     809    if {$a0 < $b0} { 
     810 
     811        return -1 
     812 
     813    } elseif {$a0 > $b0} { 
     814 
     815        return 1 
     816 
     817    } 
     818 
     819    return 0 
     820 
     821} 
     822 
     823 
     824 
    801825proc build.device w { 
    802826        set f [smallfont] 
     
    833857                return 
    834858        } 
    835         foreach d $inputDeviceList { 
     859         
     860    set inputDeviceListSorted [lsort -command compare $inputDeviceList] 
     861        foreach d $inputDeviceListSorted { 
    836862                if { [$d nickname] == "still" && ![yesno stillGrabber] } { 
    837863                        set defaultFormat($d) $videoFormat 
     
    10871113                                set defaultPort($device) $s 
    10881114                        } else { 
    1089                                 set defaultPort($device) [lindex $portnames 0] 
     1115                                # use current port setting 
     1116                                set s [string trim [attribute_class [$device attributes] selected_port]] 
     1117                                if { $s != "" } { 
     1118                                        set defaultPort($device) $s 
     1119                                } else { 
     1120                                        set defaultPort($device) [lindex $portnames 0] 
     1121                                } 
    10901122                        } 
    10911123                } 
     
    19281960        set_dither 
    19291961} 
    1930