preserve original function name for label

git-svn-id: svn://svn.rot13.org/sysadmin-cookbook@294 191e9f34-6774-4a6d-acfc-7664dacd4a2a

diff --git a/recepies/munin/plugins/gearman b/recepies/munin/plugins/gearman
index 10adfbc..78da8e5 100644 (file)
--- a/recepies/munin/plugins/gearman
+++ b/recepies/munin/plugins/gearman
@@ -43,8 +43,9 @@ if ( $arg eq 'config' ) {
                print "graph_title Gearman $multigraph\n";
 
                foreach my $name ( keys %{ $stats->{$multigraph} } ) {
+                       my $label = $name;
                        $name =~ s/\W+/_/g;
-                       print "$name.label $name\n";
+                       print "$name.label $label\n";
                }
        }
 } else {