format ports
authorDobrica Pavlinusic <dpavlin@rot13.org>
Thu, 13 Jan 2011 09:53:45 +0000 (09:53 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Thu, 13 Jan 2011 09:53:45 +0000 (09:53 +0000)
lib/PXElator/html.pm

index f464c3e..0db7c9a 100644 (file)
@@ -103,10 +103,11 @@ sub conf {
                                $html = qq|<a href="/start_stop/kvm?nr=$html">$html</a>|;
                        } elsif ( $name eq 'munin' ) {
                                $html = join("\n", map { my $url = $_; $url =~ s/-d\w+\.\w+$/.html/; qq|<a href="$url"><img src="$_"></a>| } split(/\s+/s,$html));
-                       }
-                       $html = qq|<tt>$html</tt>|
-                       unless
-                       $html =~ s{\b(\S+)\t(\S+)\t(\S+)\b}{<b title="$1/$2">$3</b> }gs;
+                       } elsif ( $name eq 'ports' ) {
+                               $html =~ s{\b(\S+)\t(\S+)\t(\S+)\b}{<b title="$1/$2">$3</b> }gs;
+                       } else {
+                               $html = qq|<tt>$html</tt>|;
+                       };
                
                        if ( $format =~ /edit|table/ ) {
                                ( $name, $html );