SourceFormat Enforcement

[thirdparty/squid.git] / scripts / mk-error-details-po.pl

diff --git a/scripts/mk-error-details-po.pl b/scripts/mk-error-details-po.pl
old mode 100644 (file)
new mode 100755 (executable)
index 1767467..b8829f9
--- a/scripts/mk-error-details-po.pl
+++ b/scripts/mk-error-details-po.pl
@@ -1,4 +1,12 @@
 #!/usr/bin/perl -w
+#
+## Copyright (C) 1996-2017 The Squid Software Foundation and contributors
+##
+## Squid software is distributed under GPLv2+ license and includes
+## contributions from numerous individuals and organizations.
+## Please see the COPYING and CONTRIBUTORS files for details.
+##
+
 #
 # Author: Tsantilas Christos
 # (C) 2011 The Measurement Factory
@@ -7,7 +15,7 @@
 #     mk-error-details-po.pl error-details.txt
 #
 # This script read the error-details.txt error details template, and prints to the
-# std output the  contents of a possible .po file.
+# std output the contents of a .PO file template for translation.
 # The error-details.txt file consist of records like the following:
 #
 #  name: X509_V_ERR_UNABLE_TO_GET_ISSUER_CERT
@@ -56,7 +64,8 @@ while(my $line = <IN>) {
 foreach my $poRec (@PO_RECORDS) {
     print $poRec->{"comment"};
     print "msgid ".$poRec->{"msgid"}."\n";
-    print "msgstr ".$poRec->{"msgstr"}."\n\n";
+    # Being a template msgstr is always empty awaiting translated texts.
+    print "msgstr \"\"\n\n";
 }
 
 exit(0);
@@ -92,12 +101,10 @@ sub processRecord
     
     $poRecDetail{"comment"} = "#: $File+".$currentRec{"name"}.".detail:$lnumber\n";
     $poRecDetail{"msgid"} = $currentRec{"detail"};
-    $poRecDetail{"msgstr"} = $currentRec{"detail"};
     merge(\@$RECS, \%poRecDetail);
 
     $poRecDescr{"comment"} = "#: $File+".$currentRec{"name"}.".descr:$lnumber\n";
     $poRecDescr{"msgid"} = $currentRec{"descr"};
-    $poRecDescr{"msgstr"} = $currentRec{"descr"};
     merge(\@$RECS, \%poRecDescr);
 }