From: Martin Helmling martin.helmling@octosoft.eu <martin.helmling@octosoft.eu>
Date: Thu, 24 Aug 2017 06:58:44 +0000 (+0200)
Subject: $self statt $_ eingebaut
X-Git-Tag: release-3.5.4~857
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=b62535cf8c433153e47742b846c380caa3f4ebcc;p=kivitendo-erp.git

$self statt $_ eingebaut
---

diff --git a/SL/DB/CustomVariable.pm b/SL/DB/CustomVariable.pm
index a34640518..cb6c83158 100644
--- a/SL/DB/CustomVariable.pm
+++ b/SL/DB/CustomVariable.pm
@@ -125,7 +125,7 @@ sub is_valid {
   require SL::DB::CustomVariableValidity;
 
   # only base level custom variables can be invalid. ovverloaded ones could potentially clash on trans_id, so disallow them
-  return 1 if $_->sub_module;
+  return 1 if $self->sub_module;
 
   $self->{is_valid} //= do {
     my $query = [config_id => $self->config_id, trans_id => $self->trans_id];