[interchange-cvs] interchange - ton modified
code/Filter/lspace2nbsp.filter
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Thu Jan 18 14:05:48 EST 2007
User: ton
Date: 2007-01-18 19:05:47 GMT
Added: code/Filter lspace2nbsp.filter
Log:
Added filter lspace2nbsp.
Translate leading spaces to nbsp
Revision Changes Path
1.1 interchange/code/Filter/lspace2nbsp.filter
rev 1.1, prev_rev 1.0
Index: lspace2nbsp.filter
===================================================================
CodeDef lspace2nbsp Filter
CodeDef lspace2nbsp Description Leading SPACE to nbsp
CodeDef lspace2nbsp Routine <<EOR
sub {
my $str = shift;
$str =~ s/^( +)/' ' x length($1)/emg;
return $str;
}
EOR
More information about the interchange-cvs
mailing list