0.8

Author: lizmat

Changes

@@ -0,0 +1,6 @@
+Revision history for actions
+
+{{$NEXT}}
+
+0.8  2024-11-07T13:04:51+01:00
+    - Initial version as a Raku Community Module

META6.json

@@ -27,5 +27,5 @@
   ],
   "test-depends": [
   ],
-  "version": "0.7.2"
+  "version": "0.8"
 }

t/01-basic.rakutest

@@ -1,7 +1,8 @@
-use v6;
 use Test;
 use POFile;
 
+plan 51;
+
 my ($PO, $result);
 
 $PO = q:to/END/;
@@ -321,4 +322,4 @@ $PO = "I will not be parsed!";
 throws-like { POFile.parse($PO) },
     POFile::CannotParse, 'Has typed exception on parsing failure';
 
-done-testing;
+# vim: expandtab shiftwidth=4

t/02-deletion.rakutest

@@ -1,7 +1,8 @@
-use v6;
 use Test;
 use POFile;
 
+plan 10;
+
 my ($PO, $result);
 
 $PO = q:to/END/;
@@ -79,5 +80,4 @@ throws-like { $result[10]:delete },
 throws-like { $result{'not-a-key'}:delete },
     POFile::IncorrectKey, 'Missing key has typed exception';
 
-
-done-testing;
+# vim: expandtab shiftwidth=4

t/03-quoting.rakutest

@@ -1,8 +1,9 @@
-use v6;
 use Test;
 use POFile :quoting;
 
+plan 2;
+
 is po-unquote(｢\t\"\\\n｣), ｢\t"\\n｣, 'Unquoting works';
 is po-quote(｢\t"\\n\｣), ｢\t\"\\\n\\｣, 'Quoting works';
 
-done-testing;
+# vim: expandtab shiftwidth=4

t/04-newline.rakutest

@@ -1,13 +1,12 @@
-use v6;
 use Test;
 use POFile;
 
-plan *;
+plan 2;
 
 my $PO = qq!msgid "One"\nmsgstr ""!;
 ok POFile.parse($PO);
 
 $PO = qq!#~ obsolete message!;
 ok POFile.parse($PO);
 
-done-testing;
+# vim: expandtab shiftwidth=4