projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 73382 - fixed formatting issue with calendar
[freeside.git]
/
eg
/
table_template.pm
diff --git
a/eg/table_template.pm
b/eg/table_template.pm
index
d609bd5
..
686bef6
100644
(file)
--- a/
eg/table_template.pm
+++ b/
eg/table_template.pm
@@
-1,11
+1,9
@@
package FS::table_name;
package FS::table_name;
+use base qw( FS::Record );
use strict;
use strict;
-use vars qw( @ISA );
use FS::Record qw( qsearch qsearchs );
use FS::Record qw( qsearch qsearchs );
-@ISA = qw(FS::Record);
-
=head1 NAME
FS::table_name - Object methods for table_name records
=head1 NAME
FS::table_name - Object methods for table_name records
@@
-93,7
+91,13
@@
and replace methods.
sub check {
my $self = shift;
sub check {
my $self = shift;
- ''; #no error
+ my $error =
+ $self->ut_numbern('primary_key')
+ || $self->ut_number('validate_other_fields')
+ ;
+ return $error if $error;
+
+ $self->SUPER::check;
}
=back
}
=back
@@
-104,7
+108,7
@@
The author forgot to customize this manpage.
=head1 SEE ALSO
=head1 SEE ALSO
-L<FS::Record>
, schema.html from the base documentation.
+L<FS::Record>
=cut
=cut