diff options
| author | ivan <ivan> | 2006-12-28 08:16:31 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2006-12-28 08:16:31 +0000 |
| commit | 0d6bdb9706b6925e4be85d7dabfb9155e1d1f2aa (patch) | |
| tree | 5911b12314d082ea8128ccb0f105d3f4c10dad3c /FS/FS/payinfo_Mixin.pm | |
| parent | 882a548260ac67b57b546e4f2e61e27cc56d4971 (diff) | |
tyop
Diffstat (limited to 'FS/FS/payinfo_Mixin.pm')
| -rw-r--r-- | FS/FS/payinfo_Mixin.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/payinfo_Mixin.pm b/FS/FS/payinfo_Mixin.pm index 505c7a5..847fcc6 100644 --- a/FS/FS/payinfo_Mixin.pm +++ b/FS/FS/payinfo_Mixin.pm @@ -14,7 +14,7 @@ package FS::some_table; use vars qw(@ISA); @ISA = qw( FS::payinfo_Mixin FS::Record ); -=had1 DESCRIPTION +=head1 DESCRIPTION This is a mixin class for records that contain payinfo. @@ -203,7 +203,7 @@ sub payinfo_check { my $self = shift; FS::payby->can_payby($self->table, $self->payby) - or return "Illegal payby"; + or return "Illegal payby: ". $self->payby; if ( $self->payby eq 'CARD' ) { my $payinfo = $self->payinfo; |