[interchange-cvs] interchange - docelic modified 2 files
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Sat Feb 17 07:39:19 EST 2007
User: docelic
Date: 2007-02-17 12:39:18 GMT
Added: code/Filter lspace_to_nbsp.filter space_to_nbsp.filter
Log:
* Rename [l]space2nbsp to [l]space_to_nbsp
* Improve space_to_nbsp filter as Kevin suggested
Revision Changes Path
1.1 interchange/code/Filter/lspace_to_nbsp.filter
rev 1.1, prev_rev 1.0
Index: lspace_to_nbsp.filter
===================================================================
# Copyright 2002-2007 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
# $Id: lspace_to_nbsp.filter,v 1.1 2007/02/17 12:39:18 docelic Exp $
CodeDef lspace_to_nbsp Filter
CodeDef lspace_to_nbsp Description Leading SPACE to nbsp
CodeDef lspace_to_nbsp Routine <<EOR
sub {
my $str = shift;
$str =~ s/^( +)/' ' x length($1)/emg;
return $str;
}
EOR
1.1 interchange/code/Filter/space_to_nbsp.filter
rev 1.1, prev_rev 1.0
Index: space_to_nbsp.filter
===================================================================
# Copyright 2002-2007 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
# $Id: space_to_nbsp.filter,v 1.1 2007/02/17 12:39:18 docelic Exp $
CodeDef space_to_nbsp Filter
CodeDef space_to_nbsp Description All SPACE to nbsp
CodeDef space_to_nbsp Routine <<EOR
sub {
my $str = shift;
$str =~ s/ / /g;
return $str;
}
EOR
More information about the interchange-cvs
mailing list