projects / occt.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 77bc2ad)
0030696: Draw Harness, testgrid - specify encoding in HTML header IR-2019-05-07
authorkgv <kgv@opencascade.com>
Mon, 6 May 2019 19:44:51 +0000 (22:44 +0300)
committerbugmaster <bugmaster@opencascade.com>
Tue, 7 May 2019 11:28:58 +0000 (14:28 +0300)
src/DrawResources/TestCommands.tcl patch | blob | blame | history

diff --git a/src/DrawResources/TestCommands.tcl b/src/DrawResources/TestCommands.tcl
index 1669f17cf4bdc0608aed3c805662fc7f40b22802..bd79782cb7113e8e953a90a82dcb49a04add89fb 100644 (file)
--- a/src/DrawResources/TestCommands.tcl
+++ b/src/DrawResources/TestCommands.tcl
@@ -1612,7 +1612,8 @@ proc _log_html {file log {title {}}} {
     }
     
     # print header
-    puts $fd "<html><head><title>$title</title></head><body><h1>$title</h1>"
+    puts $fd "<html><head><meta http-equiv='Content-Type' content='text/html; charset=utf-8'/>"
+    puts $fd "<title>$title</title></head><body><h1>$title</h1>"
 
     # add images if present; these should have either PNG, GIF, or JPG extension,
     # and start with name of the test script, with optional suffix separated
@@ -1681,7 +1682,7 @@ proc _log_html_summary {logdir log totals regressions improvements skipped total
     }
 
     # write HRML header, including command to refresh log if still in progress
-    puts $fd "<html><head>"
+    puts $fd "<html><head><meta http-equiv='Content-Type' content='text/html; charset=utf-8'/>"
     puts $fd "<title>Tests summary</title>"
     if { $total_time == "" } {
         puts $fd "<meta http-equiv=\"refresh\" content=\"10\">"
@@ -2337,7 +2338,8 @@ proc _log_html_diff {file log dir1 dir2 highlight_percent} {
     }
     
     # print header
-    puts $fd "<html><head><title>Diff $dir1 vs. $dir2</title></head><body>"
+    puts $fd "<html><head><meta http-equiv='Content-Type' content='text/html; charset=utf-8'/>"
+    puts $fd "<title>Diff $dir1 vs. $dir2</title></head><body>"
     puts $fd "<h1>Comparison of test results:</h1>"
     puts $fd "<h2>Version A \[NEW\] - $dir1</h2>"
     puts $fd "<h2>Version B \[REF\] - $dir2</h2>"
Open CASCADE Technology repository