Auth::ColumnInformation: beim Anlegen einmal fetchen

[mfinanz.git] / SL / Auth / ColumnInformation.pm

diff --git a/SL/Auth/ColumnInformation.pm b/SL/Auth/ColumnInformation.pm
index 64b600dd15bc5a5d4b51833ac653caea5270419e..bf23f6d8d144e7976c7593a97cd8b17b4fd81f0a 100644 (file)
--- a/SL/Auth/ColumnInformation.pm
+++ b/SL/Auth/ColumnInformation.pm
@@ -15,6 +15,8 @@ sub new {
   $self->{auth} = $params{auth} || croak "Missing 'auth'";
   weaken $self->{auth};
 
+  $self->_fetch if $self->{auth}->dbconnect(1);
+
   return $self;
 }