[interchange-cvs] interchange - heins modified code/Filter/convert_date.filter

[interchange-cvs at icdevgroup.org]

User:      heins
Date:      2004-02-22 19:56:25 GMT
Modified:  code/Filter convert_date.filter
Log:
* convert_date filter was returning a valid time even though no time
  was defined. While this may be desirable behavior for the [convert-date]
  ITL tag, it is not for a filter.

Revision  Changes    Path
1.2       +2 -0      interchange/code/Filter/convert_date.filter


rev 1.2, prev_rev 1.1
Index: convert_date.filter
===================================================================
RCS file: /var/cvs/interchange/code/Filter/convert_date.filter,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- convert_date.filter	13 Jan 2003 23:16:14 -0000	1.1
+++ convert_date.filter	22 Feb 2004 19:56:25 -0000	1.2
@@ -2,6 +2,8 @@
 CodeDef convert_date Routine <<EOR
 sub {
 	my $time = shift(@_);
+	# Don't convert nothing to something
+	return '' unless $time;
 	shift(@_);
 	my $fmt = shift(@_);
 	while(my $add = shift(@_)) {