diff options
author | ivan <ivan> | 2011-03-01 00:09:39 +0000 |
---|---|---|
committer | ivan <ivan> | 2011-03-01 00:09:39 +0000 |
commit | 39bf086cae20fa746336953f46ae7b9245f3891f (patch) | |
tree | c0ba15528f4c61f1c8fa38ec4dc310b5cc74450c /torrus/perllib/Torrus | |
parent | 0589594f050aa8da5085113665362aa03afe0bfd (diff) |
recognize interfaces with . turned into _ too
Diffstat (limited to 'torrus/perllib/Torrus')
-rw-r--r-- | torrus/perllib/Torrus/Renderer/HTML.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/torrus/perllib/Torrus/Renderer/HTML.pm b/torrus/perllib/Torrus/Renderer/HTML.pm index df0c65b30..6eec86d21 100644 --- a/torrus/perllib/Torrus/Renderer/HTML.pm +++ b/torrus/perllib/Torrus/Renderer/HTML.pm @@ -14,7 +14,7 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. -# $Id: HTML.pm,v 1.13 2011-02-27 19:20:37 ivan Exp $ +# $Id: HTML.pm,v 1.14 2011-03-01 00:09:39 ivan Exp $ # Stanislav Sinyagin <ssinyagin@yahoo.com> package Torrus::Renderer::HTML; @@ -120,7 +120,7 @@ sub render_html 'freesideComponent' => sub { return $self->freesideComponent(@_); }, 'uri_escape' => sub { return uri_escape(@_); }, 'matches' => sub { return $_[0] =~ $_[1]; }, - 'slash2underscore' => sub { $_[0] =~ s/\//_/g; return $_[0]; }, + 'iface_underscore' => sub { $_[0] =~ s/[\/\.]/_/g; return $_[0]; }, 'load_nms' => sub { return $self->load_nms; }, 'get_serviceids' => sub { my $nms = shift; my $router = shift; |