#2240

- Fix invalid xml (escape &) git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@16334 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Jun 13, 2013 · 1ba4571 · 1ba4571
1 parent 352e2a3
commit 1ba4571
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/Compiler/Util/Util.mo b/Compiler/Util/Util.mo
@@ -2409,7 +2409,8 @@ public function xmlEscape "Escapes a String so that it can be used in xml"
   input String s1;
   output String s2;
 algorithm
-  s2 := stringReplaceChar(s1,"<","&lt;");
+  s2 := stringReplaceChar(s1,"&","&amp;");
+  s2 := stringReplaceChar(s2,"<","&lt;");
   s2 := stringReplaceChar(s2,">","&gt;");
   s2 := stringReplaceChar(s2,"\"","&quot;");
 end xmlEscape;