[interchange-cvs] interchange - heins modified
code/Filter/date_change.filter
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Mon Feb 14 02:04:38 EST 2005
User: heins
Date: 2005-02-14 07:04:38 GMT
Modified: code/Filter date_change.filter
Log:
* Decode the entities in case we are getting a value that came
from [display ...] and has not been previously filtered
for date_change. The existence of & should indicate an entities
problem, as it is unlikely to be present in a date value.
Revision Changes Path
1.2 +2 -1 interchange/code/Filter/date_change.filter
rev 1.2, prev_rev 1.1
Index: date_change.filter
===================================================================
RCS file: /var/cvs/interchange/code/Filter/date_change.filter,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- date_change.filter 19 Oct 2004 10:03:51 -0000 1.1
+++ date_change.filter 14 Feb 2005 07:04:38 -0000 1.2
@@ -1,12 +1,13 @@
# Copyright 2002-2004 Interchange Development Group (http://www.icdevgroup.org/)
# Copyright 1996-2002 Red Hat, Inc.
# Licensed under the GNU GPL v2. See file LICENSE for details.
-# $Id: date_change.filter,v 1.1 2004/10/19 10:03:51 docelic Exp $
+# $Id: date_change.filter,v 1.2 2005/02/14 07:04:38 mheins Exp $
CodeDef date_change Filter
CodeDef date_change Routine <<EOR
sub {
my $val = shift;
+ HTML::Entities::decode_entities($val) if $val =~ /\&/;
$val =~ s/\0+//g;
return $val
unless $val =~ m:(\d+)[-/]+(\d+)[-/]+(\d+):;
More information about the interchange-cvs
mailing list