Files: Druckvariante abspeichern können: sql und rose

[mfinanz.git] / SL / DB / Warehouse.pm

diff --git a/SL/DB/Warehouse.pm b/SL/DB/Warehouse.pm
index 0557976f39349137ccaaf2b728f2298b69db188a..8345709da3a30346e5122a23834e33459edd22cd 100644 (file)
--- a/SL/DB/Warehouse.pm
+++ b/SL/DB/Warehouse.pm
@@ -1,15 +1,11 @@
-# This file has been auto-generated only because it didn't exist.
-# Feel free to modify it at will; it will not be overwritten automatically.
-
 package SL::DB::Warehouse;
 
 use strict;
 
 use SL::DB::MetaSetup::Warehouse;
+use SL::DB::Manager::Warehouse;
 use SL::DB::Helper::ActsAsList;
 
-__PACKAGE__->meta->make_manager_class;
-
 __PACKAGE__->meta->add_relationship(
   bins => {
     type         => 'one to many',
@@ -18,13 +14,14 @@ __PACKAGE__->meta->add_relationship(
   }
 );
 
-# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
-#__PACKAGE__->meta->make_manager_class;
-
 __PACKAGE__->meta->initialize;
 
+sub bins_sorted {
+  return [ sort { $a->id <=> $b->id } @{ shift()->bins || [] } ];
+}
+
 sub first_bin {
-  return shift()->bins->[0];
+  return shift()->bins_sorted->[0];
 }
 
 1;