Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Further tweaks |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
878f4068841dd2baa23bd8104ace295b |
User & Date: | kevin 2018-12-31 02:50:58 |
Context
2019-01-03
| ||
02:56 | Re-set auxiliary windows in utility style check-in: 72fa7fed11 user: kevin tags: trunk | |
2018-12-31
| ||
02:50 | Further tweaks check-in: 878f406884 user: kevin tags: trunk | |
02:32 | Update for Mojave check-in: a0507cee51 user: kevin tags: trunk | |
Changes
Changes to libs/portauthority/portauthority-main.tcl.
︙ | ︙ | |||
1184 1185 1186 1187 1188 1189 1190 | set variantport $new set variantlist [split [exec $portpath -q variants $new 2> $::env(TMPDIR)/varianterrors.txt] \n] puts $variantlist catch {destroy .variants} toplevel .variants wm title .variants "Variants" | < < < | | | | < < < < < | < < | < | 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 | set variantport $new set variantlist [split [exec $portpath -q variants $new 2> $::env(TMPDIR)/varianterrors.txt] \n] puts $variantlist catch {destroy .variants} toplevel .variants wm title .variants "Variants" ttk::frame .variants.f -padding 5 pack .variants.f -side top -fill both -expand yes listbox .variants.f.list -font {-size 10} -relief flat -bd 0 -bg #F6F6F6 -selectbackground #D2D2D2 -exportselection 0 -selectmode single pack .variants.f.list -side top -fill both -expand yes ttk::frame .variants.bottom -padding 5 pack .variants.bottom -side bottom -fill both -expand yes ttk::button .variants.bottom.install -text "Install" -command installPortVariant ttk::button .variants.bottom.cancel -text "Cancel" -command {destroy .variants} pack .variants.bottom.install .variants.bottom.cancel -side left -fill both foreach item $variantlist { .variants.f.list insert end [string trimleft [lindex [split $item \:] 0]] } } } |
︙ | ︙ |