Subject: | Delta lacks signature method |
Date: | Wed, 28 Jan 2009 23:15:50 +0000 |
To: | bug-Font-TTF [...] rt.cpan.org |
From: | Philip Taylor <pjt47 [...] cam.ac.uk> |
GDEF.pm calls Font::TTF::Ttopen::ref_cache($s->{'DEVICE'}, ...), where
the DEVICE is a Font::TTF::Delta object. ref_cache requires a
'signature' method, which is currently missing from Delta and so it
dies. This patch adds a signature.
--
Philip Taylor
pjt47@cam.ac.uk
--- a/lib/Font/TTF/Delta.pm Sun Jan 25 17:47:25 2009 +0000
+++ b/lib/Font/TTF/Delta.pm Wed Jan 28 15:45:52 2009 +0000
@@ -132,6 +132,12 @@
$out;
}
+sub signature
+{
+ my ($self) = @_;
+ return join (",", $self->{'first'}, $self->{'last'}, @{$self->{'val'}});
+}
+
=head2 $d->out_xml($context)