kept model numbers and added a dash

2003-07-28 15:49:14 +00:00
parent 0d8aa25e63
commit 9dd38845a6
1 changed files with 6 additions and 2 deletions
--- a/Info/Layer3/C3550.pm
+++ b/Info/Layer3/C3550.pm
@@ -172,10 +172,14 @@ sub vendor {
 sub model {
    my $c3550 = shift;
    my $id = $c3550->id();
-    my $model = &SNMP::translateObj($id);
+    my $model = &SNMP::translateObj($id) || $id;
    $model =~ s/^catalyst//;
-    $model =~ s/(24|48)$//;
+    #$model =~ s/(24|48)$//;

+    # turn 355048 into 3550-48
+    if ($model =~ /^(35\d\d)(\d\d[T]?)$/) {
+        $model = "$1-$2";
+    }
    return $model;
 }