X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0f0cb3b708f9078b774a07cecd996e5bdc5fac63..a74b677c81ce768c63e63ab3ba459dae3f9f42c2:/SL/Controller/CustomerVendor.pm diff --git a/SL/Controller/CustomerVendor.pm b/SL/Controller/CustomerVendor.pm index de7749037..e5cb556ac 100644 --- a/SL/Controller/CustomerVendor.pm +++ b/SL/Controller/CustomerVendor.pm @@ -167,6 +167,17 @@ sub _save { sub action_save { my ($self) = @_; + my $pattern = '[ \t\n\r]+'; + my $name = $self->{cv}->name; + $name =~ s/^$pattern//; + $name =~ s/$pattern$//; + $name =~ s/$pattern/ /g; + if ( $name eq '' ) { + $::form->dberror( $::locale->text('Customer missing!') ); + } else { + $self->{cv}->name($name); + } + $self->_save(); my @redirect_params = (