diff --git a/Changes b/Changes index 59847a5..426803a 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,6 @@ Revision history for True-Truth -0.01 Date/time - First version, released on an unsuspecting world. + +0.1 2012-04-26T13:41:41 + First version of the True::Truth diff --git a/MANIFEST b/MANIFEST index bb4e08a..8aecf5f 100644 --- a/MANIFEST +++ b/MANIFEST @@ -2,8 +2,12 @@ Changes lib/True/Truth.pm Makefile.PL MANIFEST This list of files +MANIFEST.SKIP README t/00-load.t +t/boilerplate.t t/manifest.t t/pod-coverage.t t/pod.t +t/merge.t +t/truth.t diff --git a/lib/True/Truth.pm b/lib/True/Truth.pm index 28b8668..3d5fcee 100644 --- a/lib/True/Truth.pm +++ b/lib/True/Truth.pm @@ -28,6 +28,33 @@ has 'redis' => ( lazy => 1, ); +=head1 NAME + +True::Truth - The one True::Truth! + +=head1 VERSION + +Version 0.1.1.1.1.1.1 + +=head1 SYNOPSIS + +Quick summary of what the module does. + +Perhaps a little code snippet. + + use True::Truth; + + my $foo = True::Truth->new(); + ... + + +=head1 FUNCTIONS + +=head2 add_true_truth + +needs docs + +=cut sub add_true_truth { my ($self, $key, $truth) = @_; @@ -35,6 +62,12 @@ sub add_true_truth { return $self->_add($key, $truth) -1; } +=head2 add_pending_truth + +needs docs + +=cut + sub add_pending_truth { my ($self, $key, $truth) = @_; @@ -44,6 +77,12 @@ sub add_pending_truth { return $self->_add($key, $truth) -1; } +=head2 persist_pending_truth + +needs docs + +=cut + sub persist_pending_truth { my ($self, $key, $index) = @_; @@ -55,6 +94,12 @@ sub persist_pending_truth { return; } +=head2 remove_pending_truth + +needs docs + +=cut + sub remove_pending_truth { my ($self, $key, $index) = @_; @@ -62,6 +107,12 @@ sub remove_pending_truth { return; } +=head2 get_true_truth + +needs docs + +=cut + sub get_true_truth { my ($self, $key) = @_; @@ -70,6 +121,12 @@ sub get_true_truth { return $truth; } +=head2 merge + +needs docs + +=cut + # This was stolen from Catalyst::Utils... thanks guys! sub merge (@); sub merge (@) { @@ -135,26 +192,6 @@ sub _connect_redis { return Redis->new($self->redis_server); } -=head1 NAME - -True::Truth - The one True::Truth! - -=head1 VERSION - -Version 0.1 - -=head1 SYNOPSIS - -Quick summary of what the module does. - -Perhaps a little code snippet. - - use True::Truth; - - my $foo = True::Truth->new(); - ... - - =head1 AUTHOR Lenz Gschwendtner, C<< >> diff --git a/merge.t b/t/merge.t similarity index 100% rename from merge.t rename to t/merge.t