diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-02-18 10:12:12 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-02-18 11:52:22 -0600 |
commit | 62a18e4d0e05f5d8ef18a7c25456213060e39521 (patch) | |
tree | 3496d4e995888784f13eba628b9d17a11bdfd061 /lib/Narwhal/Page/Revision.pm | |
parent | 1ffb8c7688a3ecc947c81bccbd406f277c9d853a (diff) | |
download | narwhal-62a18e4d0e05f5d8ef18a7c25456213060e39521.tar.gz narwhal-62a18e4d0e05f5d8ef18a7c25456213060e39521.zip |
make sure we're showing the historical view of the right page
Diffstat (limited to 'lib/Narwhal/Page/Revision.pm')
-rw-r--r-- | lib/Narwhal/Page/Revision.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/Narwhal/Page/Revision.pm b/lib/Narwhal/Page/Revision.pm index 08a21c9..9e2770a 100644 --- a/lib/Narwhal/Page/Revision.pm +++ b/lib/Narwhal/Page/Revision.pm @@ -5,6 +5,12 @@ use DateTime; with 'KiokuDB::Role::ID::Digest', 'MooseX::Clone'; +has page_id => ( + is => 'ro', + isa => 'Str', + required => 1, +); + has text => ( is => 'ro', isa => 'Str', @@ -41,6 +47,7 @@ sub new_revision { sub digest_parts { my $self = shift; return ( + $self->page_id, $self->text, $self->modification_date->iso8601, $self->author->id, |