Tk Source Code

Changes On Branch bug-874dca4873
Login
☰Core Home Timeline Branches Tags Tickets Download Wiki
Hide Diff Patch Unified Diff

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Changes In Branch bug-874dca4873 Excluding Merge-Ins

This is equivalent to a diff from 4c6cdfa4 to 166e2a3d

2018-10-21
13:00
Bugfix [6e8afe516d]: rework of tkBind.c. check-in: 67dd75c7 user: gcramer tags: bug6e8afe516d, tip-532
2018-09-30
19:45
Branch to work on broken Tk display on macOS 10.14 Mojave check-in: 30ab59ea user: kevin_walzer tags: mac-mojave
10:00
Fix bitmap-4.1, color-4.1 and cursor-4.1 by cherrypicking the fix [ae13ed65] from trunk. Ticket [ad98f10b3a] dealt with trunk only, the problem appears to be seen in core-8-6-branch as well when running this Tk branch with core-8-branch of Tcl, on Linux Debian 8 at least. check-in: a1a0145c user: fvogel tags: core-8-6-branch
2018-09-29
14:44
Fix [4c84b11111]: Documentation error on page 'event' about <<ThemeChanged>> Closed-Leaf check-in: 919390e3 user: fvogel tags: bug-4c84b111113
2018-09-26
06:26
Fix [9658bc800c]: Right border calculated wrong in Tk menu if borderwidth != activeborderwidth. Patch provided by ingo_brunberg check-in: 2c451736 user: fvogel tags: bug-9658bc800c
2018-09-25
19:13
Fix [f792b457eb]: scrollbar-3.26, 3.27, 3.28, 3.35 tests fail on macOS. The fix consists in using the Linux code for the testmetrics command on macOS, instead of returning the width of the scrollbar (for both cxvscroll and cyvscroll requests). Closed-Leaf check-in: 62785e5e user: fvogel tags: bug-f792b457eb
2018-09-24
19:59
Fix [050d1ea747]: scrollbar-3.50, 6.11, 6.12, 6.25, 6.39 tests fail on macOS Closed-Leaf check-in: 3e32baa0 user: fvogel tags: bug-a84b20eddf, bug-050d1ea747
02:38
Restore some metrics from earlier Cocoa implementation of scorllbar because it seems to render more accurately and smoothly Closed-Leaf check-in: a978b090 user: kevin_walzer tags: mac-scrollbar-metrics-restore
2018-09-23
20:15
Merge bugfix branch bug-874dca4873 (scrollbar-10.[12] fail on macOS) check-in: 4636008c user: fvogel tags: fv-macos-scrollbar-tests
20:11
Create new branch named "fv-macos-scrollbar-tests" check-in: c514f967 user: fvogel tags: fv-macos-scrollbar-tests
20:05
Ooops, the delta needs to be -4, not -1, in order to scroll down/right four lines/chars. Closed-Leaf check-in: 166e2a3d user: fvogel tags: bug-874dca4873
19:57
Fix [874dca4873]: scrollbar-10.[12] fail on macOS check-in: bb66444f user: fvogel tags: bug-874dca4873
2018-09-22
17:59
Patch by Arjen sent to core 2018-09-21 Closed-Leaf check-in: 77c390ba user: oehhar tags: tip474-uniform-mouse-wheel
06:51
Fix [8229232472]: Cascade menu entry indicator wrong colour on Unix. Patch provided by cjmcdonald. check-in: 091bec93 user: fvogel tags: bug-8229232472
2018-09-09
16:04
Fix [719ae3991b]: ttk scrollbar-1.[23] tests fail (regression) Closed-Leaf check-in: 16fdad9d user: fvogel tags: bug-719ae3991b
2018-09-08
17:08
Fix [6fcaaa6f80]: ttk::entry insertion cursor not visible. Patch from Csaba Nemethi. check-in: 28b52309 user: fvogel tags: trunk
17:08
Fix [6fcaaa6f80]: ttk::entry insertion cursor not visible. Patch from Csaba Nemethi. check-in: 4c6cdfa4 user: fvogel tags: core-8-6-branch
16:41
Fix [382712ade6] (X11: 'event generate . <KeyPress>' segfaults) again with a different fix. Patch from Christian Werner. check-in: 1ada7439 user: fvogel tags: core-8-6-branch
2018-09-07
20:08
Ooops, one line should have been removed in previous commit. Plus: don't convert tab to spaces on otherwise unchanged lines Closed-Leaf check-in: 1eaf79fe user: fvogel tags: bug-6fcaaa6f80

Changes to tests/scrollbar.test.

︙︙
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648














649
650
651
652
653
654
655
656
657
658
659
660














661
662
663
664
665
666
667

    catch {destroy .s}
    scrollbar .s
    interp hide {} .s
    destroy .s
    list [winfo children .] [interp hidden]
} [list {} $l]

test scrollbar-10.1 {<MouseWheel> event on scrollbar} -constraints {win|unix} -setup {
    destroy .t .s
} -body {
    pack [text .t -yscrollcommand {.s set}] -side left
    for {set i 1} {$i < 100} {incr i} {.t insert end "Line $i\n"}
    pack [scrollbar .s -command {.t yview}] -fill y -expand 1 -side left
    update
    focus -force .s
    event generate .s <MouseWheel> -delta -120
    after 200 {set eventprocessed 1} ; vwait eventprocessed
    .t index @0,0
} -cleanup {
    destroy .t .s
} -result {5.0}















test scrollbar-10.2 {<MouseWheel> event on scrollbar} -constraints {win|unix} -setup {
    destroy .t .s
} -body {
    pack [text .t -xscrollcommand {.s set} -wrap none] -side top
    for {set i 1} {$i < 100} {incr i} {.t insert end "Char $i "}
    pack [scrollbar .s -command {.t xview} -orient horizontal] -fill x -expand 1 -side top
    update
    focus -force .s
    event generate .s <Shift-MouseWheel> -delta -120
    after 200 {set eventprocessed 1} ; vwait eventprocessed
    .t index @0,0














} -cleanup {
    destroy .t .s
} -result {1.4}

test scrollbar-11.1 {bug fix: [011706ec42] Scrollbar unsafe wrt widget destruction} -body {
    proc destroy_scrollbar {} {
        if {[winfo exists .top.s]} {








|













>
>
>
>
>
>
>
>
>
>
>
>
>
>

|










>
>
>
>
>
>
>
>
>
>
>
>
>
>








628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695

    catch {destroy .s}
    scrollbar .s
    interp hide {} .s
    destroy .s
    list [winfo children .] [interp hidden]
} [list {} $l]

test scrollbar-10.1.1 {<MouseWheel> event on scrollbar} -constraints {notAqua} -setup {
    destroy .t .s
} -body {
    pack [text .t -yscrollcommand {.s set}] -side left
    for {set i 1} {$i < 100} {incr i} {.t insert end "Line $i\n"}
    pack [scrollbar .s -command {.t yview}] -fill y -expand 1 -side left
    update
    focus -force .s
    event generate .s <MouseWheel> -delta -120
    after 200 {set eventprocessed 1} ; vwait eventprocessed
    .t index @0,0
} -cleanup {
    destroy .t .s
} -result {5.0}
test scrollbar-10.1.2 {<MouseWheel> event on scrollbar} -constraints {aqua} -setup {
    destroy .t .s
} -body {
    pack [text .t -yscrollcommand {.s set}] -side left
    for {set i 1} {$i < 100} {incr i} {.t insert end "Line $i\n"}
    pack [scrollbar .s -command {.t yview}] -fill y -expand 1 -side left
    update
    focus -force .s
    event generate .s <MouseWheel> -delta -4
    after 200 {set eventprocessed 1} ; vwait eventprocessed
    .t index @0,0
} -cleanup {
    destroy .t .s
} -result {5.0}

test scrollbar-10.2.1 {<MouseWheel> event on scrollbar} -constraints {notAqua} -setup {
    destroy .t .s
} -body {
    pack [text .t -xscrollcommand {.s set} -wrap none] -side top
    for {set i 1} {$i < 100} {incr i} {.t insert end "Char $i "}
    pack [scrollbar .s -command {.t xview} -orient horizontal] -fill x -expand 1 -side top
    update
    focus -force .s
    event generate .s <Shift-MouseWheel> -delta -120
    after 200 {set eventprocessed 1} ; vwait eventprocessed
    .t index @0,0
} -cleanup {
    destroy .t .s
} -result {1.4}
test scrollbar-10.2.2 {<MouseWheel> event on scrollbar} -constraints {aqua} -setup {
    destroy .t .s
} -body {
    pack [text .t -xscrollcommand {.s set} -wrap none] -side top
    for {set i 1} {$i < 100} {incr i} {.t insert end "Char $i "}
    pack [scrollbar .s -command {.t xview} -orient horizontal] -fill x -expand 1 -side top
    update
    focus -force .s
    event generate .s <Shift-MouseWheel> -delta -4
    after 200 {set eventprocessed 1} ; vwait eventprocessed
    .t index @0,0
} -cleanup {
    destroy .t .s
} -result {1.4}

test scrollbar-11.1 {bug fix: [011706ec42] Scrollbar unsafe wrt widget destruction} -body {
    proc destroy_scrollbar {} {
        if {[winfo exists .top.s]} {
︙︙

This page was generated in about 0.027s by Fossil 2.25 [c09fea3299] 2024-05-08 11:59:18