perl-Mojolicious/sme10/Mojolicious-6.08.untaint.patch

--- Mojolicious-6.08/lib/Mojo/Template.pm.orig  2015-03-15 22:50:25.000000000 -0400
+++ Mojolicious-6.08/lib/Mojo/Template.pm       2015-04-15 13:27:11.000000000 -0400
@@ -88,7 +88,9 @@
 
   # Compile with line directive
   return undef unless defined(my $code = $self->code);
-  my $compiled = eval $self->_wrap($code);
+  # Workaround for use in taint check mode
+  $code =~ /(.*)/s;
+  my $compiled = eval $self->_wrap($1);
   $self->compiled($compiled) and return undef unless $@;
 
   # Use local stacktrace for compile exceptions
1	vip-ire	1.1	--- Mojolicious-6.08/lib/Mojo/Template.pm.orig 2015-03-15 22:50:25.000000000 -0400
2			+++ Mojolicious-6.08/lib/Mojo/Template.pm 2015-04-15 13:27:11.000000000 -0400
3			@@ -88,7 +88,9 @@
4
5			# Compile with line directive
6			return undef unless defined(my $code = $self->code);
7			- my $compiled = eval $self->_wrap($code);
8			+ # Workaround for use in taint check mode
9			+ $code =~ /(.*)/s;
10			+ my $compiled = eval $self->_wrap($1);
11			$self->compiled($compiled) and return undef unless $@;
12
13			# Use local stacktrace for compile exceptions