From 1cee26b597bb9c9e8821c44b5ba511930bd92038 Mon Sep 17 00:00:00 2001
From: Alexx Roche <munin-ipmi-plugin@alexx.net>
Date: Mon, 10 Jan 2011 10:10:54 +0100
Subject: [PATCH] Escaped the dot in the print output (worked with perl 5.8.8
 but some users found problems)

---
 plugins/other/ipmi_therm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/plugins/other/ipmi_therm b/plugins/other/ipmi_therm
index e1168e73..b9307018 100755
--- a/plugins/other/ipmi_therm
+++ b/plugins/other/ipmi_therm
@@ -22,7 +22,7 @@
 #
 # Author: Alexx Roche <munin-ipmi-plugin@alexx.net>
 # Built on the work of Justin Shepherd <galstrom21@gmail.com>
-# Revision: 1.2  2010/10/15
+# Revision: 1.3  2011/01/10
 #
 #%# family=auto
 #%# capabilities=autoconf
@@ -87,9 +87,9 @@ if ($ARGV[0] && $ARGV[0] eq "autoconf"){
                 print "graph_vlabel Temperature in Celsius\n";
                 print "graph_category Sensors\n";
                 foreach my $j (sort keys %val) {
-                        print "probe_$j.label $val{$j}{'Probe Name'}\n";
-                        print "probe_$j.warning $val{$j}{'Warning Threshold'}\n";
-                        print "probe_$j.critical $val{$j}{'Critical Threshold'}\n";
+                        print "probe_$j\.label $val{$j}{'Probe Name'}\n";
+                        print "probe_$j\.warning $val{$j}{'Warning Threshold'}\n";
+                        print "probe_$j\.critical $val{$j}{'Critical Threshold'}\n";
                 }
         }else{
              foreach my $j (sort keys %val) {