#1767

- Marked strings for translation in Error.mo - Removed some useless whitespace from a few error-messages git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@12421 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Aug 3, 2012 · b28cd79 · b28cd79
1 parent 66d0c00
commit b28cd79
Show file tree

Hide file tree

Showing 5 changed files with 3,632 additions and 350 deletions.
diff --git a/Compiler/Script/CevalScript.mo b/Compiler/Script/CevalScript.mo
@@ -4751,18 +4751,20 @@ algorithm
       Absyn.Path msgpath;
       Values.Value tyVal,severityVal,infoVal;
       list<Values.Value> values;
-      String message;
+      Util.TranslatableContent message;
+      String msg_str;
       Integer id;
       Error.Severity severity;
       Error.MessageType ty;
       Absyn.Info info;
     case Error.TOTALMESSAGE(Error.MESSAGE(id,ty,severity,message),info)
       equation
+        msg_str = Util.translateContent(message);
         msgpath = Absyn.FULLYQUALIFIED(Absyn.QUALIFIED("OpenModelica",Absyn.QUALIFIED("Scripting",Absyn.IDENT("ErrorMessage"))));
         tyVal = errorTypeToValue(ty);
         severityVal = errorLevelToValue(severity);
         infoVal = infoToValue(info);
-        values = {infoVal,Values.STRING(message),tyVal,severityVal,Values.INTEGER(id)};
+        values = {infoVal,Values.STRING(msg_str),tyVal,severityVal,Values.INTEGER(id)};
       then Values.RECORD(msgpath,values,{"info","message","kind","level","id"},-1);
   end match;
 end errorToValue;