X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FPresenter%2FCustomerVendor.pm;h=209431fd3ab38c7a7dd77b5ef884fe46f9ba35b2;hb=aaa2cd9291719d6a8f327606fc5aeeeb172b7ecb;hp=077c376c8f71a5b598878dc0f80728d55ee2c7d6;hpb=5b5dbec0272c91697acf33c4842ee9d63f041f22;p=kivitendo-erp.git

diff --git a/SL/Presenter/CustomerVendor.pm b/SL/Presenter/CustomerVendor.pm
index 077c376c8..209431fd3 100644
--- a/SL/Presenter/CustomerVendor.pm
+++ b/SL/Presenter/CustomerVendor.pm
@@ -10,12 +10,12 @@ our @EXPORT = qw(customer vendor);
 use Carp;
 
 sub customer {
-  my ($self, $customer, $type, %params) = @_;
+  my ($self, $customer, %params) = @_;
   return _customer_vendor($self, $customer, 'customer', %params);
 }
 
 sub vendor {
-  my ($self, $vendor, $type, %params) = @_;
+  my ($self, $vendor, %params) = @_;
   return _customer_vendor($self, $vendor, 'vendor', %params);
 }
 
@@ -26,8 +26,10 @@ sub _customer_vendor {
 
   croak "Unknown display type '$params{display}'" unless $params{display} =~ m/^(?:inline|table-cell)$/;
 
+  my $callback = $params{callback} ? '&callback=' . $::form->escape($params{callback}) : '';
+
   my $text = join '', (
-    $params{no_link} ? '' : '<a href="ct.pl?action=edit&amp;db=' . $type . '&amp;id=' . $self->escape($cv->id) . '">',
+    $params{no_link} ? '' : '<a href="controller.pl?action=CustomerVendor/edit&amp;db=' . $type . '&amp;id=' . $self->escape($cv->id) . '">',
     $self->escape($cv->name),
     $params{no_link} ? '' : '</a>',
   );