فهرست منبع

* Fix overflow of compiler messages (bug id 27973)

git-svn-id: trunk@43481 -
michael 5 سال پیش
والد
کامیت
43a09af7f2
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      compiler/utils/msg2inc.pp

+ 1 - 1
compiler/utils/msg2inc.pp

@@ -714,7 +714,7 @@ begin
                end;
               if s[i+k]='_' then
                inc(i,k+1);
-              writeln(t,'\item ['+s1+escapestring(Copy(s,i,255))+']');
+              writeln(t,'\item ['+s1+escapestring(Copy(s,i,255))+'] \hfill \\');
             end
            else
             writeln('error in line: ',line,' skipping');