summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/parser_helper.ml
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-24 14:09:46 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-24 14:09:46 +0000
commit7a142277463095fc22c1eb3b70d2e7a1e2e00198 (patch)
tree9f4521b9541692bd2381c48365b8fe06daffa5fd /perl_checker.src/parser_helper.ml
parentacd3b8e3cbd3c98f4f1e7d69bc73da9931cc45a5 (diff)
downloadperl-MDK-Common-7a142277463095fc22c1eb3b70d2e7a1e2e00198.tar
perl-MDK-Common-7a142277463095fc22c1eb3b70d2e7a1e2e00198.tar.gz
perl-MDK-Common-7a142277463095fc22c1eb3b70d2e7a1e2e00198.tar.bz2
perl-MDK-Common-7a142277463095fc22c1eb3b70d2e7a1e2e00198.tar.xz
perl-MDK-Common-7a142277463095fc22c1eb3b70d2e7a1e2e00198.zip
set the POT-Creation-Date to the current date
Diffstat (limited to 'perl_checker.src/parser_helper.ml')
-rw-r--r--perl_checker.src/parser_helper.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl_checker.src/parser_helper.ml b/perl_checker.src/parser_helper.ml
index 46f6300..18713f2 100644
--- a/perl_checker.src/parser_helper.ml
+++ b/perl_checker.src/parser_helper.ml
@@ -546,7 +546,7 @@ let check_format_a_la_printf s pos =
let generate_pot file =
let fd = open_out file in
output_string fd
-"# SOME DESCRIPTIVE TITLE.
+("# SOME DESCRIPTIVE TITLE.
# Copyright (C) YEAR Free Software Foundation, Inc.
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
#
@@ -554,7 +554,7 @@ let generate_pot file =
msgid \"\"
msgstr \"\"
\"Project-Id-Version: PACKAGE VERSION\\n\"
-\"POT-Creation-Date: 2002-12-05 19:52+0100\\n\"
+\"POT-Creation-Date: " ^ input_line (Unix.open_process_in "date '+%Y-%m-%d %H:%M%z'") ^ "\\n\"
\"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\\n\"
\"Last-Translator: FULL NAME <EMAIL@ADDRESS>\\n\"
\"Language-Team: LANGUAGE <LL@li.org>\\n\"
@@ -562,7 +562,7 @@ msgstr \"\"
\"Content-Type: text/plain; charset=CHARSET\\n\"
\"Content-Transfer-Encoding: 8-bit\\n\"
-" ;
+") ;
let rec print_formatted_char = function
| '"' -> output_char fd '\\'; output_char fd '"'