X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1f7b26048829f9a9622b06e2c106ae2a4f18442e..53593baa211863fbf66540cf1bcc36c8fb37257f:/SL/X/Base.pm

diff --git a/SL/X/Base.pm b/SL/X/Base.pm
index 5b77bc8eb..3e6d25123 100644
--- a/SL/X/Base.pm
+++ b/SL/X/Base.pm
@@ -12,7 +12,7 @@ sub message { goto &error }
 sub error {
   my ($self, @params) = @_;
 
-  return $self->{message} unless ($self->{message} // '') eq '';
+  return $self->{message} if ($self->{message} // '') ne '';
 
   return $self->SUPER::error(@params) if !$self->can('_defaults');