X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FPresenter%2FOrder.pm;h=35005a7187d3b12314ae638ad6713c9c2d1925f4;hb=bd0dfb5f4e2c2fb2e402827ca0aa0d33135895fd;hp=92e666c09f8858ab75d8309dce43e1424beb52ec;hpb=0e5e350124f7eec8f67109fe4777bc2dae6c0ea6;p=kivitendo-erp.git
diff --git a/SL/Presenter/Order.pm b/SL/Presenter/Order.pm
index 92e666c09..35005a718 100644
--- a/SL/Presenter/Order.pm
+++ b/SL/Presenter/Order.pm
@@ -42,11 +42,17 @@ sub _oe_record {
my $number_method = $order->quotation ? 'quonumber' : 'ordnumber';
- my $text = join '', (
- $params{no_link} ? '' : '',
- escape($order->$number_method),
- $params{no_link} ? '' : '',
- );
+ my $link_start = '';
+ my $link_end = '';
+ unless ($params{no_link}) {
+ my $action = $::instance_conf->get_feature_experimental_order
+ ? 'controller.pl?action=Order/edit'
+ : 'oe.pl?action=edit';
+ $link_start = '';
+ $link_end = '';
+ }
+
+ my $text = join '', ($link_start, escape($order->$number_method), $link_end);
is_escaped($text);
}