Shlomi Fish avatar Shlomi Fish committed 95e9004

Convert from Class::Accessor to MooX.

Comments (0)

Files changed (1)

lib/Shlomif/Homepage/FortuneCollections.pm

 
 use utf8;
 
-use base 'Class::Accessor';
+use MooX (qw( late ));
 
-my @req_fields = (qw(
+has [qw(
     about_blurb
     desc
     id
     page_title
     text
     title
-));
-
-__PACKAGE__->mk_accessors(@req_fields);
+)] => (is => 'ro', isa => 'Str', required => 1);
 
 sub nav_record
 {
 {
     my ($class, $rec) = @_;
 
-    foreach my $req_field (@req_fields)
-    {
-        if (!exists($rec->{$req_field}))
-        {
-            Carp::confess("Field $req_field does not exist in record for "
-                . Dumper($rec) . "!");
-        }
-    }
-
     return Shlomif::Homepage::FortuneCollections::Record->new($rec);
 }
 
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.