diff options
Diffstat (limited to 'lib/PDF/Builder/Resource/ColorSpace')
-rw-r--r-- | lib/PDF/Builder/Resource/ColorSpace/DeviceN.pm | 14 | ||||
-rw-r--r-- | lib/PDF/Builder/Resource/ColorSpace/Indexed.pm | 20 | ||||
-rw-r--r-- | lib/PDF/Builder/Resource/ColorSpace/Indexed/ACTFile.pm | 16 | ||||
-rw-r--r-- | lib/PDF/Builder/Resource/ColorSpace/Indexed/Hue.pm | 14 | ||||
-rw-r--r-- | lib/PDF/Builder/Resource/ColorSpace/Indexed/WebColor.pm | 18 | ||||
-rw-r--r-- | lib/PDF/Builder/Resource/ColorSpace/Separation.pm | 32 |
6 files changed, 88 insertions, 26 deletions
diff --git a/lib/PDF/Builder/Resource/ColorSpace/DeviceN.pm b/lib/PDF/Builder/Resource/ColorSpace/DeviceN.pm index adc918e..dc8a547 100644 --- a/lib/PDF/Builder/Resource/ColorSpace/DeviceN.pm +++ b/lib/PDF/Builder/Resource/ColorSpace/DeviceN.pm @@ -5,8 +5,8 @@ use base 'PDF::Builder::Resource::ColorSpace'; use strict; use warnings; -our $VERSION = '3.025'; # VERSION -our $LAST_UPDATE = '3.024'; # manually update whenever code is changed +our $VERSION = '3.026'; # VERSION +our $LAST_UPDATE = '3.026'; # manually update whenever code is changed use PDF::Builder::Basic::PDF::Utils; use PDF::Builder::Util; @@ -17,6 +17,16 @@ use Scalar::Util qw(weaken); PDF::Builder::Resource::ColorSpace::DeviceN - colorspace handling for Device CMYK. Inherits from L<PDF::Builder::Resource::ColorSpace> +=head2 new + + PDF::Builder::Resource::ColorSpace:DeviceN->new($pdf, $key, $clrs) + +=over + +Create a new DeviceN ColorSpace object. + +=back + =cut sub new { diff --git a/lib/PDF/Builder/Resource/ColorSpace/Indexed.pm b/lib/PDF/Builder/Resource/ColorSpace/Indexed.pm index 884b6e8..7220af5 100644 --- a/lib/PDF/Builder/Resource/ColorSpace/Indexed.pm +++ b/lib/PDF/Builder/Resource/ColorSpace/Indexed.pm @@ -5,8 +5,8 @@ use base 'PDF::Builder::Resource::ColorSpace'; use strict; use warnings; -our $VERSION = '3.025'; # VERSION -our $LAST_UPDATE = '3.024'; # manually update whenever code is changed +our $VERSION = '3.026'; # VERSION +our $LAST_UPDATE = '3.026'; # manually update whenever code is changed use PDF::Builder::Basic::PDF::Utils; use PDF::Builder::Util; @@ -16,6 +16,16 @@ use Scalar::Util qw(weaken); PDF::Builder::Resource::ColorSpace::Indexed - base colorspace support for indexed color models. Inherits from L<PDF::Builder::Resource::ColorSpace> +=head2 new + + PDF::Builder::Resource::ColorSpace::Indexed->new($pdf, $key, %opts) + +=over + +Create a new Indexed ColorSpace object. + +=back + =cut sub new { @@ -33,6 +43,8 @@ sub new { return $self; } +# unknown -- not used anywhere + sub enumColors { my $self = shift; @@ -45,6 +57,8 @@ sub enumColors { return %col; } +# unknown -- not used anywhere + sub nameColor { my ($self, $n) = @_; @@ -54,6 +68,8 @@ sub nameColor { return $k; } +# unknown -- not used anywhere + sub resolveNearestRGB { my $self = shift; my ($r, $g, $b) = @_; # need to be in 0-255 diff --git a/lib/PDF/Builder/Resource/ColorSpace/Indexed/ACTFile.pm b/lib/PDF/Builder/Resource/ColorSpace/Indexed/ACTFile.pm index 4cc3532..1117f4f 100644 --- a/lib/PDF/Builder/Resource/ColorSpace/Indexed/ACTFile.pm +++ b/lib/PDF/Builder/Resource/ColorSpace/Indexed/ACTFile.pm @@ -5,8 +5,8 @@ use base 'PDF::Builder::Resource::ColorSpace::Indexed'; use strict; use warnings; -our $VERSION = '3.025'; # VERSION -our $LAST_UPDATE = '3.024'; # manually update whenever code is changed +our $VERSION = '3.026'; # VERSION +our $LAST_UPDATE = '3.026'; # manually update whenever code is changed use PDF::Builder::Basic::PDF::Utils; use PDF::Builder::Util; @@ -18,9 +18,11 @@ PDF::Builder::Resource::ColorSpace::Indexed::ACTFile - Adobe Color Table support =head1 METHODS -=over +=head2 new + + $cs = PDF::Builder::Resource::ColorSpace::Indexed::ACTFile->new($pdf, $actfile) -=item $cs = PDF::Builder::Resource::ColorSpace::Indexed::ACTFile->new($pdf, $actfile) +=over Returns a new colorspace object created from an adobe color table file (ACT/8BCT). See @@ -29,6 +31,8 @@ File Formats Specification Version 6.0 Release 2, November 2000 for details. +=back + =cut sub new { @@ -63,8 +67,4 @@ sub new { return $self; } -=back - -=cut - 1; diff --git a/lib/PDF/Builder/Resource/ColorSpace/Indexed/Hue.pm b/lib/PDF/Builder/Resource/ColorSpace/Indexed/Hue.pm index 4ba76d0..2d2b54f 100644 --- a/lib/PDF/Builder/Resource/ColorSpace/Indexed/Hue.pm +++ b/lib/PDF/Builder/Resource/ColorSpace/Indexed/Hue.pm @@ -5,8 +5,8 @@ use base 'PDF::Builder::Resource::ColorSpace::Indexed'; use strict; use warnings; -our $VERSION = '3.025'; # VERSION -our $LAST_UPDATE = '3.024'; # manually update whenever code is changed +our $VERSION = '3.026'; # VERSION +our $LAST_UPDATE = '3.026'; # manually update whenever code is changed use PDF::Builder::Basic::PDF::Utils; use PDF::Builder::Util; @@ -16,6 +16,16 @@ use Scalar::Util qw(weaken); PDF::Builder::Resource::ColorSpace::Indexed::Hue - colorspace support for Device RGB. Inherits from L<PDF::Builder::Resource::ColorSpace::Indexed> +=head1 METHODS + +=head2 new + +=over + +Create a new Indexed Hue colorspace object. + +=back + =cut sub new { diff --git a/lib/PDF/Builder/Resource/ColorSpace/Indexed/WebColor.pm b/lib/PDF/Builder/Resource/ColorSpace/Indexed/WebColor.pm index d7e30d0..d4c21d6 100644 --- a/lib/PDF/Builder/Resource/ColorSpace/Indexed/WebColor.pm +++ b/lib/PDF/Builder/Resource/ColorSpace/Indexed/WebColor.pm @@ -5,8 +5,8 @@ use base 'PDF::Builder::Resource::ColorSpace::Indexed'; use strict; use warnings; -our $VERSION = '3.025'; # VERSION -our $LAST_UPDATE = '3.024'; # manually update whenever code is changed +our $VERSION = '3.026'; # VERSION +our $LAST_UPDATE = '3.026'; # manually update whenever code is changed =head1 NAME @@ -18,6 +18,20 @@ use PDF::Builder::Basic::PDF::Utils; use PDF::Builder::Util; use Scalar::Util qw(weaken); +=head1 METHODS + +=head2 new + + PDF::Builder::Resource::ColorSpace::Indexed::WebColor->new() + +=over + +Create a new "web-safe" indexed colorspace object. + +=back + +=cut + sub new { my ($class, $pdf) = @_; diff --git a/lib/PDF/Builder/Resource/ColorSpace/Separation.pm b/lib/PDF/Builder/Resource/ColorSpace/Separation.pm index 5d63931..dc47a14 100644 --- a/lib/PDF/Builder/Resource/ColorSpace/Separation.pm +++ b/lib/PDF/Builder/Resource/ColorSpace/Separation.pm @@ -5,8 +5,8 @@ use base 'PDF::Builder::Resource::ColorSpace'; use strict; use warnings; -our $VERSION = '3.025'; # VERSION -our $LAST_UPDATE = '3.024'; # manually update whenever code is changed +our $VERSION = '3.026'; # VERSION +our $LAST_UPDATE = '3.026'; # manually update whenever code is changed use PDF::Builder::Basic::PDF::Utils; use PDF::Builder::Util; @@ -18,12 +18,16 @@ PDF::Builder::Resource::ColorSpace::Separation - Support for color space separat =head1 METHODS -=over +=head2 new + + $cs = PDF::Builder::Resource::ColorSpace::Separation->new($pdf, $key, @colors) -=item $cs = PDF::Builder::Resource::ColorSpace::Separation->new($pdf, $key, @colors) +=over Returns a new colorspace object. +=back + =cut sub new { @@ -114,10 +118,16 @@ sub new { return $self; } -=item @color = $res->color() +=head2 color + + @color = $res->color() + +=over Returns the base-color of the Separation-Colorspace. +=back + =cut sub color { @@ -129,10 +139,16 @@ sub color { return @{$self->{' color'}}; } -=item $tintname = $res->tintname($tintname) +=head2 tintname + + $tintname = $res->tintname($tintname) + +=over Returns the tint-name of the Separation-Colorspace. +=back + =cut sub tintname { @@ -150,8 +166,4 @@ sub param { return $_[0]; } -=back - -=cut - 1; |