From 02201b07fb2e17fa8d673af20450e9812e73f668 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Fri, 29 May 2015 11:56:14 +0200
Subject: [PATCH] DBUpgrade: Bei 3 alten Upgrades print Noise entfernt

Im Fall einer leeren Datenbank schreiben die jetzt keine
Statusnachrichten mehr nach STDOUT, das verwirrt sonst die Tests.
---
 sql/Pg-upgrade2/SKR04-3804-addition.pl         | 2 +-
 sql/Pg-upgrade2/USTVA_at.pl                    | 2 +-
 sql/Pg-upgrade2/fix_acc_trans_ap_taxkey_bug.pl | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/sql/Pg-upgrade2/SKR04-3804-addition.pl b/sql/Pg-upgrade2/SKR04-3804-addition.pl
index b16ef2a61..d6c1ffe04 100644
--- a/sql/Pg-upgrade2/SKR04-3804-addition.pl
+++ b/sql/Pg-upgrade2/SKR04-3804-addition.pl
@@ -13,7 +13,7 @@ sub run {
 
   # 1. Überprüfen ob Kontenrahmen SKR04 ist, wenn nicht alles überspringen
   if (!$self->check_coa('Germany-DATEV-SKR04EU')) {
-    print qq|Nichts zu tun in diesem Kontenrahmen.|;
+#    print qq|Nichts zu tun in diesem Kontenrahmen.|;
     return 1;
   }
 
diff --git a/sql/Pg-upgrade2/USTVA_at.pl b/sql/Pg-upgrade2/USTVA_at.pl
index a677c5121..613e01e1e 100644
--- a/sql/Pg-upgrade2/USTVA_at.pl
+++ b/sql/Pg-upgrade2/USTVA_at.pl
@@ -12,7 +12,7 @@ sub run {
   my ($self) = @_;
 
   if (!$self->check_coa('Austria')) {
-    print qq|Nichts zu tun in diesem Kontenrahmen.|;
+#    print qq|Nichts zu tun in diesem Kontenrahmen.|;
     return 1;
   }
 
diff --git a/sql/Pg-upgrade2/fix_acc_trans_ap_taxkey_bug.pl b/sql/Pg-upgrade2/fix_acc_trans_ap_taxkey_bug.pl
index ec9e7f6af..f1b2b898e 100644
--- a/sql/Pg-upgrade2/fix_acc_trans_ap_taxkey_bug.pl
+++ b/sql/Pg-upgrade2/fix_acc_trans_ap_taxkey_bug.pl
@@ -90,7 +90,7 @@ SQL
   $h_find->finish();
   $h_change->finish();
 
-  print $::locale->text('Number of entries changed: #1', $num_changed) . "<br/>\n";
+#  print $::locale->text('Number of entries changed: #1', $num_changed) . "<br/>\n";
 
   return 1;
 }
-- 
2.20.1