Skip to content

Commit 59a6d88

Browse files
committed
gitk: fix text wrapping preferences for unthemed tk
Use a widget factory that works for both plain Tk and themed Tk. Signed-off-by: Christoph Sommer <[email protected]>
1 parent f65182a commit 59a6d88

File tree

1 file changed

+2
-4
lines changed

1 file changed

+2
-4
lines changed

gitk-git/gitk

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -11767,13 +11767,11 @@ proc prefspage_general {notebook} {
1176711767
grid x $page.tabstopl $page.tabstop -sticky w
1176811768
1176911769
${NS}::label $page.wrapcommentl -text [mc "Wrap comment text"]
11770-
${NS}::combobox $page.wrapcomment -values {none char word} -state readonly \
11771-
-textvariable wrapcomment
11770+
makedroplist $page.wrapcomment wrapcomment "none" "char" "word"
1177211771
grid x $page.wrapcommentl $page.wrapcomment -sticky w
1177311772
1177411773
${NS}::label $page.wrapdefaultl -text [mc "Wrap other text"]
11775-
${NS}::combobox $page.wrapdefault -values {none char word} -state readonly \
11776-
-textvariable wrapdefault
11774+
makedroplist $page.wrapdefault wrapdefault "none" "char" "word"
1177711775
grid x $page.wrapdefaultl $page.wrapdefault -sticky w
1177811776
1177911777
${NS}::checkbutton $page.ntag -text [mc "Display nearby tags/heads"] \

0 commit comments

Comments
 (0)