X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2b82180a2117342c28fdf913fa135ca0a1828aea..f7c4665fd435b94e599ea1ac2ba23d8e21a8420f:/SL/DB/Vendor.pm diff --git a/SL/DB/Vendor.pm b/SL/DB/Vendor.pm index 8a1ea464f..9a36afb39 100644 --- a/SL/DB/Vendor.pm +++ b/SL/DB/Vendor.pm @@ -35,7 +35,7 @@ __PACKAGE__->before_save('_before_save_set_vendornumber'); sub _before_save_set_vendornumber { my ($self) = @_; - $self->create_trans_number if $self->vendornumber eq ''; + $self->create_trans_number if !defined $self->vendornumber || $self->vendornumber eq ''; return 1; }