[freeside-commits] freeside/FS/FS payinfo_Mixin.pm,1.3,1.4

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv6771

Modified Files:
	payinfo_Mixin.pm 
Log Message:
tyop

Index: payinfo_Mixin.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/payinfo_Mixin.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- payinfo_Mixin.pm	20 Dec 2006 10:51:37 -0000	1.3
+++ payinfo_Mixin.pm	28 Dec 2006 08:16:31 -0000	1.4
@@ -14,7 +14,7 @@
 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 @@
   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;