From e8612e377901f739bda1622726b3293f5da15c47 Mon Sep 17 00:00:00 2001
From: Jeroen van Ingen <>
Date: Wed, 30 Mar 2011 12:39:00 +0000
Subject: [PATCH] Method i_speed_raw didn't return raw values; patch by
 Alexander Hartmaier.

---
 Info.pm | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/Info.pm b/Info.pm
index ddc8c680..dc4407f4 100644
--- a/Info.pm
+++ b/Info.pm
@@ -1789,6 +1789,11 @@ sub i_speed_raw {
     my $info    = shift;
     my $partial = shift;
 
+    # remove the speed formating
+    my $munge_i_speed = delete $info->{munge}{i_speed};
+    # also for highspeed interfaces e.g. TenGigabitEthernet
+    my $munge_i_speed_high = delete $info->{munge}{i_speed_high};
+
     my $i_speed_raw = $info->orig_i_speed($partial);
 
     my $i_speed_high = undef;
@@ -1800,6 +1805,11 @@ sub i_speed_raw {
                 if ( $i_speed_high->{$i} );
         }
     }
+
+    # restore the speed formating
+    $info->{munge}{i_speed} = $munge_i_speed;
+    $info->{munge}{i_speed_high} = $munge_i_speed_high;
+
     return $i_speed_raw;
 }