Просмотр исходного кода

Also discard lines beginning with # for multiline messages

git-svn-id: trunk@38416 -
pierre 7 лет назад
Родитель
Сommit
01154e1f55
1 измененных файлов с 2 добавлено и 2 удалено
  1. 2 2
      compiler/utils/msg2inc.pp

+ 2 - 2
compiler/utils/msg2inc.pp

@@ -102,7 +102,7 @@ begin
       begin
         if s=']' then
          multiline:=false
-        else
+        else if (s[1] <> '#') then
          inc(msgsize,length(s)+1); { +1 for linebreak }
       end
      else
@@ -191,7 +191,7 @@ begin
            ptxt^:=#0;
            inc(ptxt);
          end
-        else
+        else if (s[1] <> '#') then
          begin
            move(s[1],ptxt^,length(s));
            inc(ptxt,length(s));