From c8ec4402b666f6ddce759265e7db0191dce6a7fa Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 10 Nov 2003 10:28:32 +0000
Subject: in the generated .pot, try to use relative filenames (so that the
 .pot doesn't change at each build)

---
 perl_checker.src/parser_helper.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl_checker.src')

diff --git a/perl_checker.src/parser_helper.ml b/perl_checker.src/parser_helper.ml
index ac0223c..caaf0e7 100644
--- a/perl_checker.src/parser_helper.ml
+++ b/perl_checker.src/parser_helper.ml
@@ -733,7 +733,7 @@ msgstr \"\"
 	List.iter (fun po_comment -> output_string fd ("#. " ^ po_comment ^ "\n")) po_comments;
 
 	List.iter (fun _ -> Hashtbl.remove pot_strings_and_file s) l ;
-	fprintf fd "#: %s\n" (String.concat " " (List.map (fun s -> s ^ ":1") l)) ;
+	fprintf fd "#: %s\n" (String.concat " " (List.map (fun s -> Info.absolute_file_to_file s ^ ":1") l)) ;
 	output_string fd "#, c-format\n" ;
 
 	output_string fd (if String.contains s '\n' then "msgid \"\"\n\"" else "msgid \"") ;
-- 
cgit v1.2.1