/usr/local/CPAN/Image-Caa/Image/Caa/DitherNone.pm


package Image::Caa::DitherNone;

use strict;
use warnings;

sub new {
	my ($class, $args) = @_;

	my $self = bless {}, $class;

	return $self;
}

sub init {
}

sub get {
	return 0x80;
}

sub increment {
}


1;