"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "wml_include/TheWML/Backends/IPP/Line.pm" between
wml-2.28.0.tar.xz and wml-2.30.0.tar.xz

About: WML (Website META Language) is an extensible Webdesigner’s off-line HTML generation toolkit.

Line.pm  (wml-2.28.0.tar.xz):Line.pm  (wml-2.30.0.tar.xz)
skipping to change at line 58 skipping to change at line 58
$$l = $1 . $2; $$l = $1 . $2;
} }
$$l = $$store . $$l; $$l = $$store . $$l;
$$store = ''; $$store = '';
return 1; return 1;
} }
sub _line_perform_Substitutions sub _line_perform_Substitutions
{ {
my ( $self, ) = @_; my ( $self, ) = @_;
my $l = $self->l; my $l = $self->l;
my $arg = $self->arg; my $arg = $self->arg;
# Substitutions are performed from left to right and from # Substitutions are performed from left to right and from
# inner to outer, all operators have same precedence. # inner to outer, all operators have same precedence.
if ( $$l !~ m/(?:(?!\\).|^)\$\(([a-zA-Z0-9_]+)(?:(=|:[-=?+*])([^()]*))?\)/ ) if ( $$l !~ m/(?:(?!\\).|^)\$\(([a-zA-Z0-9_]+)(?:(=|:[-=?+*])([^()]*))?\)/ )
{ {
return; return;
} }
my ( $name, $op, $str ) = ( $1, $2, $3 ); my ( $name, $op, $str ) = ( $1, $2, $3 );
if ( not defined($op) ) if ( not defined($op) )
{ {
 End of changes. 1 change blocks. 
2 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)