/[pxelator]/lib/PXElator/html.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/PXElator/html.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 354 by dpavlin, Sat Aug 29 22:10:55 2009 UTC revision 362 by dpavlin, Sun Aug 30 10:38:13 2009 UTC
# Line 86  sub conf { Line 86  sub conf {
86                                  $html = qq|<a title="$html" href=http://$ip:16992/logon.htm>logon</a>|;                                  $html = qq|<a title="$html" href=http://$ip:16992/logon.htm>logon</a>|;
87                          } elsif ( $name eq 'ssh' ) {                          } elsif ( $name eq 'ssh' ) {
88                                  $html =~ s{\s(\S{16}).+(\S{16})\s}{ $1..$2 };                                  $html =~ s{\s(\S{16}).+(\S{16})\s}{ $1..$2 };
89                                    chomp($html);
90                          }                          }
91                          $html = qq|<pre style="display: inline">$html</pre>|                          $html = qq|<pre style="display: inline">$html</pre>|
92                          unless                          unless
# Line 97  sub conf { Line 98  sub conf {
98                                  qq|<em>$name</em> $html<br>|                                  qq|<em>$name</em> $html<br>|
99                          }                          }
100                  }                  }
101          } keys %$conf;          } sort keys %$conf;
102    
103          $format eq 'inline' ? join("\n", @opts) : @opts;          $format eq 'inline' ? join("\n", @opts) : @opts;
104  }  }
Legend:
Removed from v.354  
changed lines
  Added in v.362
  ViewVC Help
Powered by ViewVC 1.1.26