diff options
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/cust_main.pm | 6 | ||||
| -rw-r--r-- | FS/FS/svc_acct.pm | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index bb774df1c..e50ea7198 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -806,7 +806,7 @@ sub collect { } elsif ( $processor eq 'cybercash3.2' ) { %result = &CCMckDirectLib3_2::SendCC2_1Server(@full_xaction); } else { - return "Unkonwn real-time processor $processor\n"; + return "Unknown real-time processor $processor\n"; } #if ( $result{'MActionCode'} == 7 ) { #cybercash smps v.1.1.3 @@ -832,7 +832,7 @@ sub collect { } } else { - return "Unkonwn real-time processor $processor\n"; + return "Unknown real-time processor $processor\n"; } } else { #batch card @@ -999,7 +999,7 @@ sub check_invoicing_list { =head1 VERSION -$Id: cust_main.pm,v 1.8 2001-01-23 05:03:50 ivan Exp $ +$Id: cust_main.pm,v 1.9 2001-01-31 07:21:00 ivan Exp $ =head1 BUGS diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index d2e3918da..9d2db0eff 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -170,7 +170,7 @@ sub insert { if qsearchs( 'svc_acct', { 'username' => $self->username } ); my $part_svc = qsearchs( 'part_svc', { 'svcpart' => $self->svcpart } ); - return "Unkonwn svcpart" unless $part_svc; + return "Unknown svcpart" unless $part_svc; return "uid in use" if $part_svc->svc_acct__uid_flag ne 'F' && qsearchs( 'svc_acct', { 'uid' => $self->uid } ) @@ -385,7 +385,7 @@ sub check { $recref->{popnum} =~ /^(\d*)$/ or return "Illegal popnum: ".$recref->{popnum}; $recref->{popnum} = $1; - return "Unkonwn popnum" unless + return "Unknown popnum" unless ! $recref->{popnum} || qsearchs('svc_acct_pop',{'popnum'=> $recref->{popnum} } ); @@ -536,7 +536,7 @@ sub radius_check { =head1 VERSION -$Id: svc_acct.pm,v 1.13 2000-07-17 13:51:07 ivan Exp $ +$Id: svc_acct.pm,v 1.14 2001-01-31 07:21:00 ivan Exp $ =head1 BUGS |