Merge pull request #26 from titsuki/use-fez

Use zef instead of cpan
titsuki · Dec 11, 2022 · 1a9eeec · 1a9eeec
2 parents 1041afd + 6e9fd85
commit 1a9eeec
Show file tree

Hide file tree

Showing 9 changed files with 15 additions and 13 deletions.
diff --git a/META6.json b/META6.json
@@ -1,5 +1,5 @@
 {
-  "auth": "titsuki",
+  "auth": "zef:titsuki",
   "authors": [
     "Itsuki Toyota"
   ],

diff --git a/README.md b/README.md
@@ -1,4 +1,4 @@
-[![Actions Status](https://github.com/titsuki/raku-MeCab/workflows/test/badge.svg)](https://github.com/titsuki/raku-MeCab/actions)
+[![Build Status](https://travis-ci.org/titsuki/raku-MeCab.svg?branch=master)](https://travis-ci.org/titsuki/raku-MeCab)
 
 NAME
 ====

diff --git a/dist.ini b/dist.ini
@@ -8,6 +8,8 @@ name = raku-MeCab
 ; if you want to change a file that generates README.md, then:
 ; filename = lib/Your/Tutorial.pod
 
+[UploadToZef]
+
 [PruneFiles]
 ; if you want to prune files when packaging, then
 ; filename = utils/tool.pl

diff --git a/lib/MeCab.pm6 b/lib/MeCab.pm6
@@ -3,9 +3,9 @@ use NativeCall;
 
 my constant $library = %?RESOURCES<libraries/mecab>.Str;
 
-class MeCab:auth<titsuki>:ver<0.0.17> { }
-class MeCab::Path:auth<titsuki>:ver<0.0.17> is repr('CStruct') { ... }
-class MeCab::Node:auth<titsuki>:ver<0.0.17> is repr('CStruct') is export {
+class MeCab:auth<zef:titsuki>:ver<0.0.11> { }
+class MeCab::Path:auth<zef:titsuki>:ver<0.0.11> is repr('CStruct') { ... }
+class MeCab::Node:auth<zef:titsuki>:ver<0.0.11> is repr('CStruct') is export {
     enum Stat is export (
         :MECAB_NOR_NODE(0),
         :MECAB_UNK_NODE(1),

diff --git a/lib/MeCab/CustomBuilder.pm6 b/lib/MeCab/CustomBuilder.pm6
@@ -5,7 +5,7 @@ use Zef::Fetch;
 use Zef::Extract;
 use Distribution::Builder::MakeFromJSON;
 
-class MeCab::CustomBuilder:ver<0.0.17> is Distribution::Builder::MakeFromJSON {
+class MeCab::CustomBuilder:auth<zef:titsuki>:ver<0.0.17> is Distribution::Builder::MakeFromJSON {
     method build(IO() $work-dir = $*CWD) {
         my $workdir = ~$work-dir;
         if $*DISTRO.is-win {

diff --git a/lib/MeCab/DictionaryInfo.pm6 b/lib/MeCab/DictionaryInfo.pm6
@@ -1,5 +1,5 @@
 use v6;
-unit class MeCab::DictionaryInfo:auth<titsuki>:ver<0.0.17> is repr('CStruct');
+unit class MeCab::DictionaryInfo:auth<zef:titsuki>:ver<0.0.17> is repr('CStruct');
 
 enum DictionaryInfoType is export (
   :MECAB_SYS_DIC(0),

diff --git a/lib/MeCab/Lattice.pm6 b/lib/MeCab/Lattice.pm6
@@ -1,7 +1,7 @@
 use v6;
 use NativeCall;
 
-unit class MeCab::Lattice:auth<titsuki>:ver<0.0.17> is repr('CPointer');
+unit class MeCab::Lattice:auth<zef:titsuki>:ver<0.0.17> is repr('CPointer');
 
 use MeCab;
 
@@ -67,7 +67,7 @@ method clear {
 }
 
 method is-available returns Bool {
-    Bool(mecab_lattice_is_available(self))
+    mecab_lattice_is_available(self) ?? True !! False
 }
 
 method bos-node {
@@ -151,7 +151,7 @@ method nbest-tostr(Int $size) {
 }
 
 method has-constraint returns Bool {
-    Bool(mecab_lattice_has_constraint(self))
+    mecab_lattice_has_constraint(self) ?? True !! False
 }
 
 multi method boundary-constraint(Int $pos) returns BoundaryConstraintType {

diff --git a/lib/MeCab/Model.pm6 b/lib/MeCab/Model.pm6
@@ -1,5 +1,5 @@
 use v6;
-unit class MeCab::Model:auth<titsuki>:ver<0.0.17> is repr('CPointer');
+unit class MeCab::Model:auth<zef:titsuki>:ver<0.0.17> is repr('CPointer');
 
 use NativeCall;
 use MeCab::Tagger;

diff --git a/lib/MeCab/Tagger.pm6 b/lib/MeCab/Tagger.pm6
@@ -1,5 +1,5 @@
 use v6;
-unit class MeCab::Tagger:auth<titsuki>:ver<0.0.17> is repr('CPointer');
+unit class MeCab::Tagger:auth<zef:titsuki>:ver<0.0.17> is repr('CPointer');
 
 use NativeCall;
 use MeCab;
@@ -70,7 +70,7 @@ multi method parse(Str $text) {
 }
 
 multi method parse(MeCab::Lattice $lattice) returns Bool {
-    Bool(mecab_parse_lattice(self, $lattice))
+    mecab_parse_lattice(self, $lattice) ?? True !! False
 }
 
 method parse-tonode(Str $text) {