[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/^( +)/'&nbsp;' x length($1)/emg;
        return $str;
}
EOR









More information about the interchange-cvs mailing list