projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of git.freeside.biz:/home/git/freeside
[freeside.git]
/
FS
/
FS
/
hardware_type.pm
diff --git
a/FS/FS/hardware_type.pm
b/FS/FS/hardware_type.pm
index
ba19fcb
..
f19a3f6
100644
(file)
--- a/
FS/FS/hardware_type.pm
+++ b/
FS/FS/hardware_type.pm
@@
-39,6
+39,8
@@
to which this device type belongs.
=item model - descriptive model name or number
=item model - descriptive model name or number
+=item revision - revision name/number, subordinate to model
+
=back
=head1 METHODS
=back
=head1 METHODS
@@
-102,6
+104,7
@@
sub check {
$self->ut_numbern('typenum')
|| $self->ut_foreign_key('classnum', 'hardware_class', 'classnum')
|| $self->ut_text('model')
$self->ut_numbern('typenum')
|| $self->ut_foreign_key('classnum', 'hardware_class', 'classnum')
|| $self->ut_text('model')
+ || $self->ut_textn('revision')
;
return $error if $error;
;
return $error if $error;
@@
-119,6
+122,17
@@
sub hardware_class {
return qsearchs('hardware_class', { 'classnum' => $self->classnum });
}
return qsearchs('hardware_class', { 'classnum' => $self->classnum });
}
+=item description
+
+Returns the model and revision number.
+
+=cut
+
+sub description {
+ my $self = shift;
+ $self->model . ($self->revision ? ' '.$self->revision : '');
+}
+
=back
=head1 SEE ALSO
=back
=head1 SEE ALSO