[freeside-commits] freeside/torrus/perllib/Torrus/Renderer HTML.pm, 1.7, 1.8

[Erik Levinson]

Update of /home/cvs/cvsroot/freeside/torrus/perllib/Torrus/Renderer
In directory wavetail.420.am:/tmp/cvs-serv9731/torrus/perllib/Torrus/Renderer

Modified Files:
	HTML.pm 
Log Message:
torrus, UI, RT10574

Index: HTML.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/torrus/perllib/Torrus/Renderer/HTML.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -w -d -r1.7 -r1.8
--- HTML.pm	7 Feb 2011 05:20:41 -0000	1.7
+++ HTML.pm	10 Feb 2011 01:08:44 -0000	1.8
@@ -120,6 +120,7 @@
         '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;