r27195 - in /trunk/libpdf-api2-perl: META.yml Makefile.PL debian/changelog lib/PDF/API2/Basic/PDF/Dict.pm lib/PDF/API2/Resource/CIDFont/TrueType.pm lib/PDF/API2/Resource/Font.pm lib/PDF/API2/Version.pm
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Sun Nov 23 10:52:44 UTC 2008
Author: dmn
Date: Sun Nov 23 10:52:41 2008
New Revision: 27195
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27195
Log:
New upstream release
Modified:
trunk/libpdf-api2-perl/META.yml
trunk/libpdf-api2-perl/Makefile.PL
trunk/libpdf-api2-perl/debian/changelog
trunk/libpdf-api2-perl/lib/PDF/API2/Basic/PDF/Dict.pm
trunk/libpdf-api2-perl/lib/PDF/API2/Resource/CIDFont/TrueType.pm
trunk/libpdf-api2-perl/lib/PDF/API2/Resource/Font.pm
trunk/libpdf-api2-perl/lib/PDF/API2/Version.pm
Modified: trunk/libpdf-api2-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpdf-api2-perl/META.yml?rev=27195&op=diff
==============================================================================
--- trunk/libpdf-api2-perl/META.yml (original)
+++ trunk/libpdf-api2-perl/META.yml Sun Nov 23 10:52:41 2008
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: PDF-API2
-version: 0.71.001
+version: 0.72.003
abstract: TheNextGen PDF Create/Modify API
license: ~
author:
Modified: trunk/libpdf-api2-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpdf-api2-perl/Makefile.PL?rev=27195&op=diff
==============================================================================
--- trunk/libpdf-api2-perl/Makefile.PL (original)
+++ trunk/libpdf-api2-perl/Makefile.PL Sun Nov 23 10:52:41 2008
@@ -35,6 +35,7 @@
require 5.008;
use ExtUtils::MakeMaker;
+use File::Basename;
my $versionfile = "lib/PDF/API2/Version.pm";
@@ -47,7 +48,7 @@
dist => {
ZIP => "zip ",
ZIPFLAGS => " -v -o -r -9 ",
- COMPRESS => "gzip -9 -f ",
+ COMPRESS => "gzip -9 -f ",
},
MAN1PODS => {},
MAN3PODS => {},
@@ -56,22 +57,17 @@
BINARY_LOCATION => q|PDF-API2-|.$PDF::API2::Version::CVersion{vPerl}.q|.ppm.tar.gz|,
);
+if(-f dirname($0).'/tarhelper.pm')
+{
+$makehash{dist}->{TAR} = "perl -Mtarhelper";
+$makehash{dist}->{TARFLAGS} = "-e mytar";
+}
+
WriteMakefile( %makehash );
print STDERR $PDF::API2::Version::CVersion{vWeb}."\n";
exit;
-sub MY::postamble{
- my $y=qq|ppmdist: pm_to_blib ppd dist\n|;
- $y.=qq|\t\$(MKPATH) \$(DISTNAME)-\$(VERSION)-PPM\n|;
- $y.=qq|\t\$(TAR) \$(TARFLAGS) \$(DISTNAME)-\$(VERSION)-PPM/\$(DISTNAME)-\$(VERSION).ppm.tar blib\n|;
- $y.=qq|\t\$(COMPRESS) \$(DISTNAME)-\$(VERSION)-PPM/\$(DISTNAME)-\$(VERSION).ppm.tar\n|;
- $y.=qq|\t\$(CP) \$(DISTNAME).ppd \$(DISTNAME)-\$(VERSION)-PPM/\$(DISTNAME).ppd\n|;
- $y.=qq|\t\$(ZIP) \$(ZIPFLAGS) \$(DISTNAME)-\$(VERSION).ppm.zip \$(DISTNAME)-\$(VERSION)-PPM/\$(DISTNAME)-\$(VERSION).ppm.tar.gz \$(DISTNAME)-\$(VERSION)-PPM/\$(DISTNAME).ppd\n|;
- $y.=qq|\t\$(RM_RF) \$(DISTNAME)-\$(VERSION)-PPM\n|;
- $y.=qq|\n|;
- return($y);
-}
__END__
Modified: trunk/libpdf-api2-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpdf-api2-perl/debian/changelog?rev=27195&op=diff
==============================================================================
--- trunk/libpdf-api2-perl/debian/changelog (original)
+++ trunk/libpdf-api2-perl/debian/changelog Sun Nov 23 10:52:41 2008
@@ -1,9 +1,13 @@
-libpdf-api2-perl (0.71.001-2) UNRELEASED; urgency=low
-
+libpdf-api2-perl (0.72.003-1) UNRELEASED; urgency=low
+
+ [ gregor herrmann ]
* debian/control: Changed: Switched Vcs-Browser field to ViewSVN
(source stanza).
- -- gregor herrmann <gregoa at debian.org> Sun, 16 Nov 2008 20:45:57 +0100
+ [ Damyan Ivanov ]
+ * New upstream release
+
+ -- Damyan Ivanov <dmn at debian.org> Sun, 23 Nov 2008 12:41:16 +0200
libpdf-api2-perl (0.71.001-1) unstable; urgency=low
Modified: trunk/libpdf-api2-perl/lib/PDF/API2/Basic/PDF/Dict.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpdf-api2-perl/lib/PDF/API2/Basic/PDF/Dict.pm?rev=27195&op=diff
==============================================================================
--- trunk/libpdf-api2-perl/lib/PDF/API2/Basic/PDF/Dict.pm (original)
+++ trunk/libpdf-api2-perl/lib/PDF/API2/Basic/PDF/Dict.pm Sun Nov 23 10:52:41 2008
@@ -21,7 +21,7 @@
# This specific module is licensed under the Perl Artistic License.
#
#
-# $Id: Dict.pm,v 2.0 2005/11/16 02:16:00 areibens Exp $
+# $Id: Dict.pm,v 2.1 2008/11/04 23:54:51 areibens Exp $
#
#=======================================================================
package PDF::API2::Basic::PDF::Dict;
@@ -307,10 +307,11 @@
$opts{-xmlfh}->print("</Stream>\n");
} elsif (defined $self->{' streamfile'})
{
- open(DICTFH, $self->{' streamfile'}) || die "Unable to open $self->{' streamfile'}";
- binmode(DICTFH.':raw');
+ my $DICTFH;
+ open($DICTFH, $self->{' streamfile'}) || die "Unable to open $self->{' streamfile'}";
+ binmode($DICTFH,':raw');
$opts{-xmlfh}->print("<Stream>\n");
- while (read(DICTFH, $str, 4096))
+ while (read($DICTFH, $str, 4096))
{
if ($self->{' nofilt'})
{
@@ -319,7 +320,7 @@
}
$opts{-xmlfh}->print($str);
}
- close(DICTFH);
+ close($DICTFH);
if ($self->{' nofilt'})
{
$str = '';
Modified: trunk/libpdf-api2-perl/lib/PDF/API2/Resource/CIDFont/TrueType.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpdf-api2-perl/lib/PDF/API2/Resource/CIDFont/TrueType.pm?rev=27195&op=diff
==============================================================================
--- trunk/libpdf-api2-perl/lib/PDF/API2/Resource/CIDFont/TrueType.pm (original)
+++ trunk/libpdf-api2-perl/lib/PDF/API2/Resource/CIDFont/TrueType.pm Sun Nov 23 10:52:41 2008
@@ -27,7 +27,7 @@
# Free Software Foundation, Inc., 59 Temple Place - Suite 330,
# Boston, MA 02111-1307, USA.
#
-# $Id: TrueType.pm,v 2.3 2007/11/16 19:27:32 areibens Exp $
+# $Id: TrueType.pm,v 2.4 2008/11/20 19:51:01 areibens Exp $
#
#=======================================================================
package PDF::API2::Resource::CIDFont::TrueType;
@@ -50,7 +50,7 @@
@ISA = qw( PDF::API2::Resource::CIDFont );
- ( $VERSION ) = sprintf '%i.%03i', split(/\./,('$Revision: 2.3 $' =~ /Revision: (\S+)\s/)[0]); # $Date: 2007/11/16 19:27:32 $
+ ( $VERSION ) = sprintf '%i.%03i', split(/\./,('$Revision: 2.4 $' =~ /Revision: (\S+)\s/)[0]); # $Date: 2008/11/20 19:51:01 $
}
no warnings qw[ deprecated recursion uninitialized ];
@@ -140,11 +140,12 @@
{
my $self=shift @_;
my $g=shift @_;
+ my $tmp = $self->fontobj->{'hmtx'}->read->{'advance'}[$g];
my $w;
- if(defined $self->fontobj->{'hmtx'}->read->{'advance'}[$g])
+ if(defined $t)
{
- $w = int($self->fontobj->{'hmtx'}->read->{'advance'}[$g]*1000/$self->data->{upem});
+ $w = int($t*1000/$self->data->{upem});
}
else
{
@@ -244,6 +245,9 @@
=head1 HISTORY
$Log: TrueType.pm,v $
+ Revision 2.4 2008/11/20 19:51:01 areibens
+ perf henning.just at datagraf.dk
+
Revision 2.3 2007/11/16 19:27:32 areibens
fixed -noembed option
Modified: trunk/libpdf-api2-perl/lib/PDF/API2/Resource/Font.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpdf-api2-perl/lib/PDF/API2/Resource/Font.pm?rev=27195&op=diff
==============================================================================
--- trunk/libpdf-api2-perl/lib/PDF/API2/Resource/Font.pm (original)
+++ trunk/libpdf-api2-perl/lib/PDF/API2/Resource/Font.pm Sun Nov 23 10:52:41 2008
@@ -27,7 +27,7 @@
# Free Software Foundation, Inc., 59 Temple Place - Suite 330,
# Boston, MA 02111-1307, USA.
#
-# $Id: Font.pm,v 2.1 2007/03/10 12:05:41 areibens Exp $
+# $Id: Font.pm,v 2.2 2008/11/04 23:54:51 areibens Exp $
#
#=======================================================================
package PDF::API2::Resource::Font;
@@ -47,7 +47,7 @@
@ISA = qw( PDF::API2::Resource::BaseFont );
- ( $VERSION ) = sprintf '%i.%03i', split(/\./,('$Revision: 2.1 $' =~ /Revision: (\S+)\s/)[0]); # $Date: 2007/03/10 12:05:41 $
+ ( $VERSION ) = sprintf '%i.%03i', split(/\./,('$Revision: 2.2 $' =~ /Revision: (\S+)\s/)[0]); # $Date: 2008/11/04 23:54:51 $
}
no warnings qw[ deprecated recursion uninitialized ];
@@ -73,6 +73,7 @@
my $blk=$1;
$data->{e2u}=[ map { $blk*256+$_ } (0..255) ];
$data->{e2n}=[ map { nameByUni($_) || '.notdef' } @{$data->{e2u}} ];
+ $data->{firstchar} = 0;
}
elsif(defined $encoding)
{
@@ -267,6 +268,9 @@
=head1 HISTORY
$Log: Font.pm,v $
+ Revision 2.2 2008/11/04 23:54:51 areibens
+ fixed [rt.cpan.org #40648] Unicode text prints text on top of text before it
+
Revision 2.1 2007/03/10 12:05:41 areibens
applied improvements to encodeByData proposed by alankila at bel.fi
Modified: trunk/libpdf-api2-perl/lib/PDF/API2/Version.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libpdf-api2-perl/lib/PDF/API2/Version.pm?rev=27195&op=diff
==============================================================================
--- trunk/libpdf-api2-perl/lib/PDF/API2/Version.pm (original)
+++ trunk/libpdf-api2-perl/lib/PDF/API2/Version.pm Sun Nov 23 10:52:41 2008
@@ -9,14 +9,14 @@
package PDF::API2::Version;
BEGIN {
use vars qw( $VERSION %CVersion );
- $VERSION = '0.71.001';
+ $VERSION = '0.72.003';
%CVersion = (
- 'vFredo' => 'PDF::API2 0.71.001',
- 'vHex' => '0x00047001',
- 'vLong' => '0.71.001',
- 'vPerl' => '0.71.001',
- 'vShort' => '0.71',
- 'vWeb' => 'PDF::API2/0.71.001',
+ 'vFredo' => 'PDF::API2 0.72.003',
+ 'vHex' => '0x00048003',
+ 'vLong' => '0.72.003',
+ 'vPerl' => '0.72.003',
+ 'vShort' => '0.72',
+ 'vWeb' => 'PDF::API2/0.72.003',
);
}
1;
@@ -32,12 +32,12 @@
=head1 VERSION
- vFredo: PDF::API2 0.71.001
- vHex: 0x00047001
- vLong: 0.71.001
- vPerl: 0.71.001
- vShort: 0.71
- vWeb: PDF::API2/0.71.001
+ vFredo: PDF::API2 0.72.003
+ vHex: 0x00048003
+ vLong: 0.72.003
+ vPerl: 0.72.003
+ vShort: 0.72
+ vWeb: PDF::API2/0.72.003
=cut
More information about the Pkg-perl-cvs-commits
mailing list