eine get_standard_dbh reduziert.

diff --git a/SL/Form.pm b/SL/Form.pm
index 5f5cd72b596abbd79fc6a52b99170ea98bc62012..9ad161010f3611eb268d333d48efecf6c2d1f8b0 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -2608,7 +2608,7 @@ sub all_vc {
   my ($self, $myconfig, $table, $module) = @_;
 
   my $ref;
   my ($self, $myconfig, $table, $module) = @_;
 
   my $ref;

-  my $dbh = $self->get_standard_dbh($myconfig);
+  my $dbh = $self->get_standard_dbh;

 
   $table = $table eq "customer" ? "customer" : "vendor";
 
 
   $table = $table eq "customer" ? "customer" : "vendor";