From 7a142277463095fc22c1eb3b70d2e7a1e2e00198 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 24 Feb 2003 14:09:46 +0000
Subject: set the POT-Creation-Date to the current date

---
 perl_checker.src/parser_helper.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl_checker.src/parser_helper.ml')

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 '"'
-- 
cgit v1.2.1