Format

lib/Pear/LocalLoop/Schema/Result/EntityAssociation.pm

@@ -34,5 +34,5 @@ __PACKAGE__->set_primary_key("id");
 
 __PACKAGE__->belongs_to( "entity", "Pear::LocalLoop::Schema::Result::Entity",
     "entity_id", );
-    
+
 1;

lib/Pear/LocalLoop/Schema/Result/Organisation.pm

@@ -146,7 +146,7 @@ sub sqlt_deploy_hook {
     else {
         $pending_field->{default_value} = \"false";
     }
-    
+
     return 1;
 }
 

lib/Pear/LocalLoop/Schema/Result/Transaction.pm

@@ -103,7 +103,7 @@ sub sqlt_deploy_hook {
     else {
         $pending_field->{default_value} = \"false";
     }
-    
+
     return 1;
 }
 

lib/Pear/LocalLoop/Schema/Result/User.pm

@@ -99,7 +99,7 @@ sub sqlt_deploy_hook {
     else {
         $pending_field->{default_value} = \"false";
     }
-    
+
     return 1;
 }
 

lib/Pear/LocalLoop/Schema/ResultSet/Category.pm

@@ -8,12 +8,8 @@ use base 'DBIx::Class::ResultSet';
 sub as_hash {
     my ($self) = @_;
 
-    my %category_list = (
-        (
-            map { $_->id => $_->name, } $self->all
-        ),
-        0 => 'Uncategorised',
-    );
+    my %category_list =
+      ( ( map { $_->id => $_->name, } $self->all ), 0 => 'Uncategorised', );
     return \%category_list;
 }
 
@@ -21,9 +17,7 @@ sub as_hash_name_icon {
     my ($self) = @_;
 
     my %category_list = (
-        (
-            map { $_->name => $_->line_icon, } $self->all
-        ),
+        ( map { $_->name => $_->line_icon, } $self->all ),
         0 => 'Uncategorised',
     );
     return \%category_list;

lib/Pear/LocalLoop/Schema/ResultSet/ImportSet.pm

@@ -39,7 +39,7 @@ sub _unordered_get_values {
 }
 
 sub get_users {
-    my ($self, $set_id) = @_;
+    my ( $self, $set_id ) = @_;
 
     return $self->_unordered_get_values($set_id)->search(
         {},

lib/Pear/LocalLoop/Schema/ResultSet/Leaderboard.pm

@@ -92,7 +92,7 @@ sub recalculate_all {
             warn "Unrecognised Set";
         }
     }
-    
+
     return 1;
 }
 
@@ -107,7 +107,7 @@ sub _recalculate_leaderboard {
             $lb_result->create_new($date);
         }
     );
-    
+
     return 1;
 }
 

lib/Pear/LocalLoop/Schema/Script/DeploymentHandler.pm

@@ -207,7 +207,7 @@ sub cmd_write_ddl {
             }
         );
     }
-    
+
     return 1;
 }
 
@@ -227,7 +227,7 @@ sub cmd_install_dh {
             version => $self->version,
         }
     );
-    
+
     return 1;
 }
 
@@ -245,7 +245,7 @@ sub cmd_install {
             version => $self->version,
         }
     );
-    
+
     return 1;
 }
 
@@ -259,7 +259,7 @@ sub cmd_upgrade {
     my ($self) = @_;
 
     $self->dh->upgrade;
-    
+
     return 1;
 }