cvs commit: p5ee/App-Repository/lib/App/SessionObject RepositoryObjectSet.pm

cvsuser     06/02/08 14:12:10

  Modified:    App-Repository/lib/App/SessionObject RepositoryObjectSet.pm
  Log:
  move initialization call to get it right
  
  Revision  Changes    Path
  1.9       +2 -2      p5ee/App-Repository/lib/App/SessionObject/RepositoryObjectSet.pm
  
  Index: RepositoryObjectSet.pm
  ===================================================================
  RCS file: /cvs/public/p5ee/App-Repository/lib/App/SessionObject/RepositoryObjectSet.pm,v
  retrieving revision 1.8
  retrieving revision 1.9
  diff -u -r1.8 -r1.9
  --- RepositoryObjectSet.pm	15 Nov 2005 16:47:23 -0000	1.8
  +++ RepositoryObjectSet.pm	8 Feb 2006 22:12:10 -0000	1.9
  @@ -49,6 +49,7 @@
   sub _init {
       &App::sub_entry if ($App::trace);
       my ($self, $args) = @_;
  +    $self->SUPER::_init();
       my $table   = $self->{table} || die "table not defined";
       $self->_clear_cache_if_auto_params_changed() if ($self->{auto_params});   # sets params from auto_params
       $self->_clear_cache_if_auto_columns_changed() if ($self->{auto_columns}); # sets columns from auto_columns
  @@ -58,7 +59,6 @@
           my $rep     = $context->repository($repname);
           $self->{columns} = $rep->_get_default_columns($table);
       }
  -    $self->SUPER::_init();
       &App::sub_exit() if ($App::trace);
   }