diff --git a/lib/diff.tcl b/lib/diff.tcl
index 39e4d90..f5ed5d1 100644
--- a/lib/diff.tcl
+++ b/lib/diff.tcl
@@ -502,7 +502,7 @@
 
 		foreach {posbegin colbegin posend colend} $markup {
 			set prefix clr
-			foreach style [split $colbegin ";"] {
+			foreach style [lsort -integer [split $colbegin ";"]] {
 				if {$style eq "7"} {append prefix i; continue}
 				if {$style != 4 && ($style < 30 || $style > 47)} {continue}
 				set a "$mark linestart + $posbegin chars"