Index: TECH/StringUtils.cls.xml
===================================================================
diff -u -r3280 -r3290
--- TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 3280)
+++ TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 3290)
@@ -353,6 +353,7 @@
 		If $Length(Woord) > CharactersPerWoord {
 			Set Lijn = Lijn _$Extract(Woord, 1, CharactersPerWoord) _Delimiter
 			Set Woord = $Extract(Woord, CharactersPerWoord+1, *)
+			Set Woord = ..SplitLongWord(Woord, CharactersPerWoord, Delimiter)
 		} 
 		Set Lijn = Lijn _Woord _Delimiter
 	}