[interchange-cvs] interchange - jon modified code/SystemTag/image.tag

[interchange-cvs at icdevgroup.org]

User:      jon
Date:      2005-10-15 00:32:41 GMT
Modified:  code/SystemTag image.tag
Log:
Add support for XHTML trailing slash.

Revision  Changes    Path
1.15      +3 -3      interchange/code/SystemTag/image.tag


rev 1.15, prev_rev 1.14
Index: image.tag
===================================================================
RCS file: /var/cvs/interchange/code/SystemTag/image.tag,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -u -r1.14 -r1.15
--- image.tag	3 Aug 2005 18:58:48 -0000	1.14
+++ image.tag	15 Oct 2005 00:32:41 -0000	1.15
@@ -1,12 +1,12 @@
 # Copyright 2002, 2004 Interchange Development Group (http://www.icdevgroup.org/)
 # Licensed under the GNU GPL v2. See file LICENSE for details.
-# $Id: image.tag,v 1.14 2005/08/03 18:58:48 jon Exp $
+# $Id: image.tag,v 1.15 2005/10/15 00:32:41 jon Exp $
 
 UserTag image Order     src
 UserTag image AttrAlias geometry makesize
 UserTag image AttrAlias resize makesize
 UserTag image AddAttr
-UserTag image Version   $Revision: 1.14 $
+UserTag image Version   $Revision: 1.15 $
 UserTag image Routine   <<EOR
 sub {
 	my ($src, $opt) = @_;
@@ -258,7 +258,7 @@
 		$opts .= " $opt->{extra}";
 	}
 	$image =~ s/"/&quot;/g;
-	return qq{<img src="$image"$opts>};
+	return qq{<img src="$image"$opts$Vend::Xtrailer>};
 }
 EOR