From 4dc97e80cb06497c386300c9bbe2d134c4722996 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Mon, 23 Jan 2017 16:39:39 +0100
Subject: [PATCH] IC: obsoletes back_to_record entfernt

---
 bin/mozilla/ic.pl | 15 +--------------
 1 file changed, 1 insertion(+), 14 deletions(-)

diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl
index 8f4702cd1..34915eaf9 100644
--- a/bin/mozilla/ic.pl
+++ b/bin/mozilla/ic.pl
@@ -668,23 +668,10 @@ sub generate_report {
   $lxdebug->leave_sub();
 }    #end generate_report
 
-sub back_to_record {
-  _check_io_auth();
-
-
-  delete @{$::form}{qw(action action_add action_back_to_record back_sub description item notes partnumber sellprice taxaccount2 unit vc)};
-
-  $::auth->restore_form_from_session($::form->{previousform}, clobber => 1);
-  $::form->{rowcount}--;
-  $::form->{action}   = 'display_form';
-  $::form->{callback} = $::form->{script} . '?' . join('&', map { $::form->escape($_) . '=' . $::form->escape($::form->{$_}) } sort keys %{ $::form });
-  $::form->redirect;
-}
-
 sub continue { call_sub($form->{"nextsub"}); }
 
 sub dispatcher {
-  my $action = first { $::form->{"action_${_}"} } qw(add back_to_record);
+  my $action = first { $::form->{"action_${_}"} } qw(add);
   $::form->error($::locale->text('No action defined.')) unless $action;
 
   $::form->{dispatched_action} = $action;
-- 
2.20.1