SL::DBUpgrade2: Dateien direkt als UTF-8 öffnen und SL::IConv nicht nutzen

[mfinanz.git] / SL / PriceSource / PriceRules.pm

diff --git a/SL/PriceSource/PriceRules.pm b/SL/PriceSource/PriceRules.pm
index c9cecf9314e24d5f1723b73aa0484089166e9144..140706d473365183c4c5c132953b87047c6c093e 100644 (file)
--- a/SL/PriceSource/PriceRules.pm
+++ b/SL/PriceSource/PriceRules.pm
@@ -93,6 +93,7 @@ sub make_price_from_rule {
     spec         => $rule->id,
     description  => $rule->name,
     price_source => $self,
+    (invalid      => t8('This Price Rule is no longer valid'))x!!$rule->obsolete,
   )
 }
 
@@ -104,6 +105,7 @@ sub make_discount_from_rule {
     spec         => $rule->id,
     description  => $rule->name,
     price_source => $self,
+    (invalid      => t8('This Price Rule is no longer valid'))x!!$rule->obsolete,
   )
 }