From 406b21cab11a2a89f359d40d10d6b37e60eddc1e Mon Sep 17 00:00:00 2001 From: levinse Date: Thu, 10 Feb 2011 01:08:44 +0000 Subject: torrus, UI, RT10574 --- torrus/perllib/Torrus/Renderer/HTML.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'torrus/perllib') diff --git a/torrus/perllib/Torrus/Renderer/HTML.pm b/torrus/perllib/Torrus/Renderer/HTML.pm index 657f66f00..bf6ba99b9 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.7 2011-02-07 05:20:41 levinse Exp $ +# $Id: HTML.pm,v 1.8 2011-02-10 01:08:44 levinse Exp $ # Stanislav Sinyagin package Torrus::Renderer::HTML; @@ -120,6 +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]; }, 'load_nms' => sub { return $self->load_nms; }, 'get_serviceids' => sub { my $nms = shift; my $router = shift; -- cgit v1.2.1