X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FInstanceConfiguration.pm;h=1e9c6a10fd4b8af4eeb5052239a2e1944eee336a;hb=df91c9fde8209d66dab26e657a2b1a4a105b5ee7;hp=65b7b7a3d66da83f8fb452c50c871908ea6ad8c6;hpb=50c2f2285ce7fc70626afdce52a25172761d0ab7;p=kivitendo-erp.git

diff --git a/SL/InstanceConfiguration.pm b/SL/InstanceConfiguration.pm
index 65b7b7a3d..1e9c6a10f 100644
--- a/SL/InstanceConfiguration.pm
+++ b/SL/InstanceConfiguration.pm
@@ -124,6 +124,26 @@ sub get_ap_show_mark_as_paid {
   return $self->{data}->{ap_show_mark_as_paid};
 }
 
+sub get_sales_order_show_delete {
+  my ($self) = @_;
+  return $self->{data}->{sales_order_show_delete};
+}
+
+sub get_purchase_order_show_delete {
+  my ($self) = @_;
+  return $self->{data}->{purchase_order_show_delete};
+}
+
+sub get_sales_delivery_order_show_delete {
+  my ($self) = @_;
+  return $self->{data}->{sales_delivery_order_show_delete};
+}
+
+sub get_purchase_delivery_order_show_delete {
+  my ($self) = @_;
+  return $self->{data}->{purchase_delivery_order_show_delete};
+}
+
 1;
 
 __END__
@@ -138,7 +158,7 @@ SL::InstanceConfiguration - Provide instance-specific configuration data
 
 =head1 SYNOPSIS
 
-Lx-Office has two configuration levels: installation specific
+kivitendo has two configuration levels: installation specific
 (provided by the global variable C<%::lx_office_conf>) and instance
 specific. The latter is provided by a global instance of this class,
 C<$::instance_conf>.
@@ -225,6 +245,17 @@ Returns the default behavior for showing best before date, true or false
 Returns the default behavior for showing the mark as paid button for the
 corresponding record type (true or false).
 
+=item C<get_sales_order_show_delete>
+
+=item C<get_purchase_order_show_delete>
+
+=item C<get_sales_delivery_order_show_delete>
+
+=item C<get_purchase_delivery_order_show_delete>
+
+Returns the default behavior for showing the delete button for the
+corresponding record type (true or false).
+
 =back
 
 =head1 BUGS