X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fhardware_type.pm;h=85473125cc86a86e7633b5edbb44c9d820391c8b;hb=f4daf7e8c831fe126dc3fd1d6d0db5ee3b46d602;hp=f19a3f683f28ef5eaa677c54ca83803fd6aa25cd;hpb=825422583d2d510c0f552c513bef4cc1ac921950;p=freeside.git

diff --git a/FS/FS/hardware_type.pm b/FS/FS/hardware_type.pm
index f19a3f683..85473125c 100644
--- a/FS/FS/hardware_type.pm
+++ b/FS/FS/hardware_type.pm
@@ -1,8 +1,7 @@
 package FS::hardware_type;
+use base qw( FS::Record );
 
 use strict;
-use base qw( FS::Record );
-use FS::Record qw( qsearch qsearchs );
 
 =head1 NAME
 
@@ -41,6 +40,8 @@ to which this device type belongs.
 
 =item revision - revision name/number, subordinate to model
 
+=item title - external ID
+
 =back
 
 =head1 METHODS
@@ -105,6 +106,7 @@ sub check {
     || $self->ut_foreign_key('classnum', 'hardware_class', 'classnum')
     || $self->ut_text('model')
     || $self->ut_textn('revision')
+    || $self->ut_textn('title')
   ;
   return $error if $error;
 
@@ -115,13 +117,6 @@ sub check {
 
 Returns the L<FS::hardware_class> associated with this device.
 
-=cut
-
-sub hardware_class {
-  my $self = shift;
-  return qsearchs('hardware_class', { 'classnum' => $self->classnum });
-}
-
 =item description
 
 Returns the model and revision number.