[interchange-cvs] interchange - racke modified
code/Filter/vars_and_comments.filter
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Fri Oct 29 07:28:01 EDT 2004
User: racke
Date: 2004-10-29 11:28:01 GMT
Added: code/Filter vars_and_comments.filter
Log:
added new vars_and_comments filter to replace variables in arbritrary chunks
of text
Revision Changes Path
1.1 interchange/code/Filter/vars_and_comments.filter
rev 1.1, prev_rev 1.0
Index: vars_and_comments.filter
===================================================================
# Copyright 2004 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
# $Id: vars_and_comments.filter,v 1.1 2004/10/29 11:28:01 racke Exp $
CodeDef vars_and_comments Filter
CodeDef vars_and_comments Routine <<EOR
sub {
my $body = shift;
my $bodyref = ref($body) ? $body : \$body;
Vend::Interpolate::vars_and_comments($bodyref);
return ref($body) ? $body: $$bodyref;
}
EOR
More information about the interchange-cvs
mailing list