Changeset 44 in bookmarks

Timestamp:

05/31/13 14:56:12 (11 years ago)

Author:

peter

Message:

• make the id, ctime, and mtime attributes of Bookmark read-only
• mtime defaults to the ctime

File:

• trunk/Bookmark.pm (modified) (1 diff)

trunk/Bookmark.pm

@@ -3 +3 @@
 use Moose;
 
-has id    => ( is => 'rw' );
+has id    => ( is => 'ro' );
 has uri   => ( is => 'rw' );
 has title => ( is => 'rw' );
-has ctime => ( is => 'rw' );
-has mtime => ( is => 'rw' );
+has ctime => ( is => 'ro' );
+has mtime => (
+    is => 'ro',
+    # mtime defaults to ctime
+    default => sub { $_[0]->ctime },
+    lazy => 1,
+);
 has tags  => ( is => 'rw' );
 has bookmark_uri => ( is => 'rw' );