From: ivan <ivan>
Date: Thu, 28 Dec 2006 08:16:31 +0000 (+0000)
Subject: tyop
X-Git-Tag: TRIXBOX_2_6~805
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=0d6bdb9706b6925e4be85d7dabfb9155e1d1f2aa

tyop
---

diff --git a/FS/FS/payinfo_Mixin.pm b/FS/FS/payinfo_Mixin.pm
index 505c7a5cd..847fcc62a 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;