File tree 1 file changed +3
-0
lines changed
1 file changed +3
-0
lines changed Original file line number Diff line number Diff line change @@ -8346,6 +8346,7 @@ proc parseblobdiffline {ids line} {
8346
8346
if {$type eq " --cc" } {
8347
8347
# start of a new file in a merge diff
8348
8348
set fname [ string range $line 10 end]
8349
+ set fname [ encoding convertfrom utf-8 $fname ]
8349
8350
if {[ lsearch -exact $treediffs($ids) $fname ] < 0} {
8350
8351
lappend treediffs($ids ) $fname
8351
8352
add_flist [ list $fname ]
@@ -8379,6 +8380,7 @@ proc parseblobdiffline {ids line} {
8379
8380
8380
8381
} elseif {![ string compare -length 16 " * Unmerged path " $line ] } {
8381
8382
set fname [ encoding convertfrom utf-8 [string range $line 16 end] ]
8383
+ set line [ encoding convertfrom utf-8 $line ]
8382
8384
$ctext insert end " \n "
8383
8385
set curdiffstart [ $ctext index " end - 1c" ]
8384
8386
lappend ctext_file_names $fname
@@ -12519,6 +12521,7 @@ catch {
12519
12521
if {$gitencoding == " " } {
12520
12522
set gitencoding " utf-8"
12521
12523
}
12524
+ encoding system utf-8
12522
12525
set tclencoding [ tcl_encoding $gitencoding ]
12523
12526
if {$tclencoding == {}} {
12524
12527
puts stderr " Warning: encoding $gitencoding is not supported by Tcl/Tk"
You can’t perform that action at this time.
0 commit comments