paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-06 14:58:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

updatepofiles: keeping comment lines

Browse Source 
git-svn-id: trunk@12291 -
This commit is contained in:
mattias 2007-10-02 10:02:11 +00:00
parent 420aff2f9d
commit a33a4aa0ce
10 changed files with 13 additions and 134 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ideintf/languages/objinspstrconsts.ca.po
View File

@ -1,14 +1,3 @@
msgid ""
msgstr ""
"Project-Id-Version: \n"
"POT-Creation-Date: \n"
"PO-Revision-Date: 2006-10-25 18:36+0100\n"
"Last-Translator: J.Salvador Pérez <salvaperez@escomposlinux.org>\n"
"Language-Team: \n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=iso-8859-1\n"
"Content-Transfer-Encoding: 8bit\n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr "%d línies, %d caràcters"

16
ideintf/languages/objinspstrconsts.fr.po
View File

@ -1,18 +1,4 @@
msgid ""
msgstr ""
"Project-Id-Version: \n"
"POT-Creation-Date: \n"
"PO-Revision-Date: 2007-06-05 18:25+0100\n"
"Last-Translator: Laurent Jacques <wile64@gmail.com>\n"
"Language-Team: \n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=utf-8\n"
"Content-Transfer-Encoding: 8bit\n"
"X-Poedit-Language: French\n"
"X-Poedit-Country: FRANCE\n"
"X-Poedit-SourceCharset: utf-8\n"
#: objinspstrconsts:oisdlinesdchars
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr "%d lignes, %d caractères"

11
ideintf/languages/objinspstrconsts.id.po
View File

@ -1,14 +1,3 @@
msgid ""
msgstr ""
"Project-Id-Version: \n"
"POT-Creation-Date: \n"
"PO-Revision-Date: 2007-01-29 23:56+0700\n"
"Last-Translator: Zaenal Mutaqin <ade999@gmail.com>\n"
"Language-Team: \n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr "%d baris, %d chars"

12
ideintf/languages/objinspstrconsts.it.po
View File

@ -1,15 +1,3 @@
# translation of objinspstrconsts.po to Italian Marco Ciampa <ciampix@libero.it>, 2005. Dean Zobec <dezobec@tin.it>, 2006.
msgid ""
msgstr ""
"Project-Id-Version: objinspstrconsts\n"
"PO-Revision-Date: 2006-02-25 22:12+0100\n"
"Last-Translator: Dean Zobec <dezobec@tin.it>\n"
"Language-Team: Italian\n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"X-Generator: KBabel 1.10.2\n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr "%d righe, %d caratteri"

14
ideintf/languages/objinspstrconsts.lt.po
View File

@ -1,16 +1,3 @@
# translation of objinspstrconsts.po to Lithuanian Valdas Jankūnas <skroblas@erdves.lt>, 2007.
msgid ""
msgstr ""
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"Mime-Version: 1.0Last-Translator: Valdas Jankūnas <skroblas@erdves.lt>\n"
"PO-Revision-Date: 2007-09-29 15:19+0300\n"
"Project-Id-Version: objinspstrconsts\n"
"Language-Team: Lithuanian\n"
"X-Generator: KBabel 1.11.4\n"
"MIME-Version: 1.0\n"
"Last-Translator: Valdas Jankūnas <skroblas@erdves.lt>\n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr "%d eilučių, %d simbolių"
@ -598,6 +585,7 @@ msgstr "Perkelti žemyn"
#: objinspstrconsts:sccssgedtmoverowscols
msgid "Move Rows/Cols"
msgstr ""
""
"Perkelti\n"
"eilutes/\n"
"stulpelius"

14
ideintf/languages/objinspstrconsts.pl.po
View File

@ -1,17 +1,3 @@
msgid ""
msgstr ""
"Last-Translator: Paweł Trochimczuk\n"
"PO-Revision-Date: 2007-09-15 14:05+0100\n"
"Project-Id-Version: objinspstrconsts\n"
"Content-Type: text/plain; charset=UTF-8\n"
"X-Poedit-Language: Polish\n"
"X-Poedit-Country: POLAND\n"
"POT-Creation-Date: \n"
"MIME-Version: 1.0\n"
"Content-Transfer-Encoding: 8bit\n"
"X-Poedit-SourceCharset: utf-8\n"
"Language-Team: \n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr ""

11
ideintf/languages/objinspstrconsts.pliso.po
View File

@ -1,14 +1,3 @@
msgid ""
msgstr ""
"Last-Translator: Dominik Zablotny <dominz@wp.pl>\n"
"PO-Revision-Date: 2004-02-06 02:26+0100\n"
"Project-Id-Version: objinspstrconsts\n"
"Language-Team: polski <pl@li.org>\n"
"Content-Type: text/plain; charset=ISO_8859-2\n"
"Content-Transfer-Encoding: 8bit\n"
"X-Generator: KBabel 1.3\n"
"Plural-Forms: nplurals=3; plural=(n==1 ? 0 : n%10>=2 && n%10<=4 && (n%100<10 || n%100>=20) ? 1 : 2);\n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr ""

11
ideintf/languages/objinspstrconsts.plwin.po
View File

@ -1,14 +1,3 @@
msgid ""
msgstr ""
"Last-Translator: Dominik Zablotny <dominz@wp.pl>\n"
"PO-Revision-Date: 2004-02-06 02:26+0100\n"
"Project-Id-Version: objinspstrconsts\n"
"Language-Team: polski <pl@li.org>\n"
"Content-Type: text/plain; charset=CP1250\n"
"Content-Transfer-Encoding: 8bit\n"
"X-Generator: KBabel 1.3\n"
"Plural-Forms: nplurals=3; plural=(n==1 ? 0 : n%10>=2 && n%10<=4 && (n%100<10 || n%100>=20) ? 1 : 2);\n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr ""

11
ideintf/languages/objinspstrconsts.ru.po
View File

@ -1,14 +1,3 @@
msgid ""
msgstr ""
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"Project-Id-Version: \n"
"POT-Creation-Date: \n"
"PO-Revision-Date: 2007-10-02 01:54+0300\n"
"Last-Translator: Maxim Ganetsky <maxkill@mail.ru>\n"
"Language-Team: \n"
#: objinspstrconsts:oisdlinesdchars
msgid "%d lines, %d chars"
msgstr "%d строк, %d символов"

36
tools/updatepofiles.pas
View File

@ -161,7 +161,7 @@ begin
while Line<SrcFile.Count do begin
s:=SrcFile[Line];
if (s<>'') and (s[1]='"') then begin
Result^.ID:=Result^.ID+copy(s,2,length(s)-2);
Result^.ID:=Result^.ID+#10+copy(s,2,length(s)-2);
inc(Line);
end else
break;
@ -175,7 +175,7 @@ begin
while Line<SrcFile.Count do begin
s:=SrcFile[Line];
if (s<>'') and (s[1]='"') then begin
Result^.Str:=Result^.Str+copy(s,2,length(s)-2);
Result^.Str:=Result^.Str+#10+copy(s,2,length(s)-2);
inc(Line);
end else
break;
@ -194,36 +194,22 @@ procedure WriteMessageItem(MsgItem: PMsgItem; DestFile: TStringList);
var
s: String;
p: Integer;
PrefixWritten: Boolean;
begin
s:=Prefix+' "';
PrefixWritten:=false;
p:=1;
while (p<=length(Str)) do begin
if Str[p]='\' then begin
inc(p,2);
if (p<=length(Str)+1) and (Str[p-1]='n') then begin
// a new line \n
// -> break line
if not PrefixWritten then begin
// end last line and add it
s:=s+'"';
DestFile.Add(s);
PrefixWritten:=true;
s:='"';
end;
// add line
s:=s+copy(Str,1,p-1)+'"';
DestFile.Add(s);
Str:=copy(Str,p,length(Str));
p:=1;
// start new line
s:='"';
end;
if Str[p]=#10 then begin
// a new line
s:=s+copy(Str,1,p-1)+'"';
DestFile.Add(s);
Str:=copy(Str,p+1,length(Str));
p:=1;
// start new line
s:='"';
end else
inc(p);
end;
if (Str<>'') or (not PrefixWritten) then begin
if (Str<>'') or (s<>'"') then begin
s:=s+Str+'"';
DestFile.Add(s);
end;