remove class blocks from widget code

1 files changed, 76 insertions, 72 deletions

diff --git a/lib/Reaction/UI/Widget/ListView.pm b/lib/Reaction/UI/Widget/ListView.pm
index ab041e6..9c0e7d1 100644
--- a/lib/Reaction/UI/Widget/ListView.pm
+++ b/lib/Reaction/UI/Widget/ListView.pm
@@ -2,95 +2,99 @@ package Reaction::UI::Widget::ListView;
 
 use Reaction::UI::WidgetClass;
 
-class ListView is 'Reaction::UI::Widget::Collection::Grid', which {
+use namespace::clean -except => [ qw(meta) ];
+extends 'Reaction::UI::Widget::Collection::Grid';
 
-  after fragment widget {
-    arg pager_obj => $_{viewport}->pager;
-  };
 
-  implements fragment pager_fragment {
-    my $pager = $_{pager_obj};
-    if( $pager->last_page > $pager->first_page ) {
-      render 'pager';
-    }
-  };
 
-  implements fragment actions {
-    render action => over $_{viewport}->actions;
-  };
+after fragment widget {
+  arg pager_obj => $_{viewport}->pager;
+};
 
-  implements fragment action {
-    render 'viewport';
-  };
+implements fragment pager_fragment {
+  my $pager = $_{pager_obj};
+  if( $pager->last_page > $pager->first_page ) {
+    render 'pager';
+  }
+};
 
-  after fragment header_cells {
-    if ($_{viewport}->object_action_count) {
-      render 'header_action_cell';
-    }
-  };
+implements fragment actions {
+  render action => over $_{viewport}->actions;
+};
 
-  around fragment header_cell {
-    arg order_uri => event_uri {
-      order_by => $_,
-      order_by_desc => ((($_{viewport}->order_by||'') ne $_
-                        || $_{viewport}->order_by_desc) ? 0 : 1)
-    };
-    call_next;
-  };
+implements fragment action {
+  render 'viewport';
+};
 
-  implements fragment header_action_cell {
-    arg col_count => $_{viewport}->object_action_count;
-  };
+after fragment header_cells {
+  if ($_{viewport}->object_action_count) {
+    render 'header_action_cell';
+  }
+};
 
-  implements fragment page_list {
-    render numbered_page_fragment
-      => over [ $_{pager_obj}->first_page .. $_{pager_obj}->last_page ];
+around fragment header_cell {
+  arg order_uri => event_uri {
+    order_by => $_,
+    order_by_desc => ((($_{viewport}->order_by||'') ne $_
+                      || $_{viewport}->order_by_desc) ? 0 : 1)
   };
+  call_next;
+};
 
-  implements fragment numbered_page_fragment {
-    arg page_uri => event_uri { page => $_ };
-    arg page_number => $_;
-    if ($_{pager_obj}->current_page == $_) {
-      render 'numbered_page_this_page';
-    } else {
-      render 'numbered_page';
-    }
-  };
+implements fragment header_action_cell {
+  arg col_count => $_{viewport}->object_action_count;
+};
 
-  implements fragment first_page {
-    arg page_uri => event_uri { page => $_{pager_obj}->first_page };
-    arg page_name => 'First';
-    render 'named_page';
-  };
+implements fragment page_list {
+  render numbered_page_fragment
+    => over [ $_{pager_obj}->first_page .. $_{pager_obj}->last_page ];
+};
 
-  implements fragment last_page {
-    arg page_uri => event_uri { page => $_{pager_obj}->last_page };
-    arg page_name => 'Last';
-    render 'named_page';
-  };
+implements fragment numbered_page_fragment {
+  arg page_uri => event_uri { page => $_ };
+  arg page_number => $_;
+  if ($_{pager_obj}->current_page == $_) {
+    render 'numbered_page_this_page';
+  } else {
+    render 'numbered_page';
+  }
+};
 
-  implements fragment next_page {
-    arg page_name => 'Next';
-    if (my $page = $_{pager_obj}->next_page) {
-      arg page_uri => event_uri { page => $page };
-      render 'named_page';
-    } else {
-      render 'named_page_no_page';
-    }
-  };
+implements fragment first_page {
+  arg page_uri => event_uri { page => $_{pager_obj}->first_page };
+  arg page_name => 'First';
+  render 'named_page';
+};
 
-  implements fragment previous_page {
-    arg page_name => 'Previous';
-    if (my $page = $_{pager_obj}->previous_page) {
-      arg page_uri => event_uri { page => $page };
-      render 'named_page';
-    } else {
-      render 'named_page_no_page';
-    }
-  };
+implements fragment last_page {
+  arg page_uri => event_uri { page => $_{pager_obj}->last_page };
+  arg page_name => 'Last';
+  render 'named_page';
+};
 
+implements fragment next_page {
+  arg page_name => 'Next';
+  if (my $page = $_{pager_obj}->next_page) {
+    arg page_uri => event_uri { page => $page };
+    render 'named_page';
+  } else {
+    render 'named_page_no_page';
+  }
 };
 
+implements fragment previous_page {
+  arg page_name => 'Previous';
+  if (my $page = $_{pager_obj}->previous_page) {
+    arg page_uri => event_uri { page => $page };
+    render 'named_page';
+  } else {
+    render 'named_page_no_page';
+  }
+};
+
+__PACKAGE__->meta->make_immutable;
+
+
 1;
 
 __END__;