From d5afa9f5928c24f55d00cfde0a7dfd68bbddc473 Mon Sep 17 00:00:00 2001 From: Max Baker <> Date: Thu, 28 Oct 2004 21:37:36 +0000 Subject: [PATCH] got rid of some warnings for undef models --- Info/Layer2/HP.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Info/Layer2/HP.pm b/Info/Layer2/HP.pm index 6873455c..1104eb8d 100644 --- a/Info/Layer2/HP.pm +++ b/Info/Layer2/HP.pm @@ -157,7 +157,9 @@ sub os_ver { sub model { my $hp = shift; my $id = $hp->id(); + return undef unless defined $id; my $model = &SNMP::translateObj($id); + return $id unless defined $model; $model =~ s/^hpswitch//i;