[Po4a-commits] "po4a/t 23-man.t, 1.12, 1.13 28-msguntypot.t, 1.4, 1.5"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/t
In directory alioth:/tmp/cvs-serv447/t

Modified Files:
	23-man.t 28-msguntypot.t 
Log Message:
Fix failures when the testsuite is run from the distributed
tarball.
  * MANIFEST: Added missing files t/data-27/options.xml,
    t/data-27/options.po, t/data-27/options-normalized.xml
  * t/23-man.t, t/28-msguntypot.t: Make sure the testsuite does not
    fail if the files are readonly.


Index: 23-man.t
===================================================================
RCS file: /cvsroot/po4a/po4a/t/23-man.t,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- 23-man.t	31 Dec 2006 14:18:31 -0000	1.12
+++ 23-man.t	3 Mar 2008 23:39:19 -0000	1.13
@@ -64,7 +64,7 @@
   'test' => "diff -u $diff_po_flags  data-23/dot5.pot tmp/dot5.pot",
   'doc'  => "gettextize well various lines beginning by a dot (5)",
 }, {
-  'run'  => "cp data-23/dot5.it.po tmp/ && perl ../po4a-updatepo -f #format# -m data-23/dot5 -p tmp/dot5.it.po >/dev/null 2>&1 ",
+  'run'  => "cp data-23/dot5.it.po tmp/ && chmod u+w tmp/dot5.it.po && perl ../po4a-updatepo -f #format# -m data-23/dot5 -p tmp/dot5.it.po >/dev/null 2>&1 ",
   'test' => "diff -u $diff_po_flags  data-23/dot5.it.po tmp/dot5.it.po",
   'doc'  => "updatepo for this document",
 }, {

Index: 28-msguntypot.t
===================================================================
RCS file: /cvsroot/po4a/po4a/t/28-msguntypot.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- 28-msguntypot.t	29 Feb 2008 20:53:08 -0000	1.4
+++ 28-msguntypot.t	3 Mar 2008 23:39:19 -0000	1.5
@@ -15,44 +15,44 @@
 my $diff_po_flags = "";
 
 push @tests, {
-  'run' => 'cp ../data-28/test1.po . && perl ../../scripts/msguntypot -o ../data-28/test1.old.pot -n ../data-28/test1.new.pot test1.po > /dev/null',
+  'run' => 'cp ../data-28/test1.po . && chmod u+w test1.po && perl ../../scripts/msguntypot -o ../data-28/test1.old.pot -n ../data-28/test1.new.pot test1.po > /dev/null',
   'test'=> "diff -u $diff_po_flags ../data-28/test1.new.po test1.po",
   'doc' => 'nominal test',
   };
 push @tests, {
-  'run' => 'cp ../data-28/test2.po . && perl ../../scripts/msguntypot -o ../data-28/test2.old.pot -n ../data-28/test2.new.pot test2.po > /dev/null',
+  'run' => 'cp ../data-28/test2.po . && chmod u+w test2.po && perl ../../scripts/msguntypot -o ../data-28/test2.old.pot -n ../data-28/test2.new.pot test2.po > /dev/null',
   'test'=> "diff -u $diff_po_flags ../data-28/test2.new.po test2.po",
   'doc' => 'fuzzy test',
   };
 # Moved strings are not supported.
 # Only typo fixes!
 #push @tests, {
-#  'run' => 'cp ../data-28/test3.po . && perl ../../scripts/msguntypot -o ../data-28/test3.old.pot -n ../data-28/test3.new.pot test3.po',
+#  'run' => 'cp ../data-28/test3.po . && chmod u+w test3.po && perl ../../scripts/msguntypot -o ../data-28/test3.old.pot -n ../data-28/test3.new.pot test3.po',
 #  'test'=> "diff -u $diff_po_flags test3.po ../data-28/test3.new.po",
 #  'doc' => 'msg moved test',
 #  };
 push @tests, {
-  'run' => 'cp ../data-28/test4.po . && perl ../../scripts/msguntypot -o ../data-28/test4.old.pot -n ../data-28/test4.new.pot test4.po > /dev/null',
+  'run' => 'cp ../data-28/test4.po . && chmod u+w test4.po && perl ../../scripts/msguntypot -o ../data-28/test4.old.pot -n ../data-28/test4.new.pot test4.po > /dev/null',
   'test'=> "diff -u $diff_po_flags ../data-28/test4.new.po test4.po",
   'doc' => 'plural strings (typo in msgid) test',
   };
 push @tests, {
-  'run' => 'cp ../data-28/test5.po . && perl ../../scripts/msguntypot -o ../data-28/test5.old.pot -n ../data-28/test5.new.pot test5.po > /dev/null',
+  'run' => 'cp ../data-28/test5.po . && chmod u+w test5.po && perl ../../scripts/msguntypot -o ../data-28/test5.old.pot -n ../data-28/test5.new.pot test5.po > /dev/null',
   'test'=> "diff -u $diff_po_flags ../data-28/test5.new.po test5.po",
   'doc' => 'plural strings (typo in msgid_plural) test',
   };
 push @tests, {
-  'run' => 'cp ../data-28/test6.po . && perl ../../scripts/msguntypot -o ../data-28/test6.old.pot -n ../data-28/test6.new.pot test6.po > /dev/null',
+  'run' => 'cp ../data-28/test6.po . && chmod u+w test6.po && perl ../../scripts/msguntypot -o ../data-28/test6.old.pot -n ../data-28/test6.new.pot test6.po > /dev/null',
   'test'=> "diff -u $diff_po_flags ../data-28/test6.new.po test6.po",
   'doc' => 'plural strings (typo in another msgid) test',
   };
 push @tests, {
-  'run' => 'cp ../data-28/test7.po . && perl ../../scripts/msguntypot -o ../data-28/test7.old.pot -n ../data-28/test7.new.pot test7.po > /dev/null',
+  'run' => 'cp ../data-28/test7.po . && chmod u+w test7.po && perl ../../scripts/msguntypot -o ../data-28/test7.old.pot -n ../data-28/test7.new.pot test7.po > /dev/null',
   'test'=> "diff -u $diff_po_flags ../data-28/test7.new.po test7.po",
   'doc' => 'plural fuzzy strings (typo in msgid) test',
   };
 push @tests, {
-  'run' => 'cp ../data-28/test8.po . && perl ../../scripts/msguntypot -o ../data-28/test8.old.pot -n ../data-28/test8.new.pot test8.po > /dev/null',
+  'run' => 'cp ../data-28/test8.po . && chmod u+w test8.po && perl ../../scripts/msguntypot -o ../data-28/test8.old.pot -n ../data-28/test8.new.pot test8.po > /dev/null',
   'test'=> "diff -u $diff_po_flags ../data-28/test8.new.po test8.po",
   'doc' => 'plural fuzzy strings (typo in msgid_plural) test',
   };