summaryrefslogtreecommitdiff
path: root/lib/GridFiller/Types.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/GridFiller/Types.pm')
-rw-r--r--lib/GridFiller/Types.pm15
1 files changed, 15 insertions, 0 deletions
diff --git a/lib/GridFiller/Types.pm b/lib/GridFiller/Types.pm
index 92834ba..90e094f 100644
--- a/lib/GridFiller/Types.pm
+++ b/lib/GridFiller/Types.pm
@@ -1,9 +1,13 @@
package GridFiller::Types;
+use strict;
+use warnings;
+use namespace::autoclean;
use MooseX::Types -declare =>
[qw(
GridT GridStatusT
CharT LetterCellT TextResultT
WordListT
+ FontDescrT FontOptT
)];
use MooseX::Types::Moose qw(Str ArrayRef Int);
use MooseX::Types::Structured qw(Tuple);
@@ -23,4 +27,15 @@ subtype WordListT, as ArrayRef[Str];
subtype TextResultT, as ArrayRef[ArrayRef[LetterCellT]];
+class_type FontDescrT, { class => 'Pango::FontDescription' };
+
+coerce FontDescrT,
+ from Str,
+ via {
+ require Pango;
+ Pango::FontDescription->from_string($_);
+ };
+
+class_type FontOptT, { class => 'Cairo::FontOptions' };
+
1;