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

interchange-cvs at icdevgroup.org interchange-cvs at icdevgroup.org
Sun Jun 22 02:53:11 UTC 2008


User:      jon
Date:      2008-06-22 02:53:11 GMT
Modified:  code/SystemTag image.tag
Log:
Add name and id to list of [image] pass-through attributes.

Revision  Changes    Path
1.24                 interchange/code/SystemTag/image.tag


rev 1.24, prev_rev 1.23
Index: image.tag
===================================================================
RCS file: /var/cvs/interchange/code/SystemTag/image.tag,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -u -r1.23 -r1.24
--- image.tag	25 Mar 2008 17:13:20 -0000	1.23
+++ image.tag	22 Jun 2008 02:53:11 -0000	1.24
@@ -5,13 +5,13 @@
 # the Free Software Foundation; either version 2 of the License, or
 # (at your option) any later version.  See the LICENSE file for details.
 # 
-# $Id: image.tag,v 1.23 2008-03-25 17:13:20 jon Exp $
+# $Id: image.tag,v 1.24 2008-06-22 02:53:11 jon Exp $
 
 UserTag image Order     src
 UserTag image AttrAlias geometry makesize
 UserTag image AttrAlias resize makesize
 UserTag image AddAttr
-UserTag image Version   $Revision: 1.23 $
+UserTag image Version   $Revision: 1.24 $
 UserTag image Routine   <<EOR
 sub {
 	my ($src, $opt) = @_;
@@ -259,7 +259,7 @@
 	$opt->{title} = $opt->{alt} if ! defined $opt->{title} and $opt->{alt};
 
 	my $opts = '';
-	for (qw: width height alt title border hspace vspace align valign style class :) {
+	for (qw: width height alt title border hspace vspace align valign style class name id :) {
 		if (defined $opt->{$_}) {
 			my $val = $opt->{$_};
 			$val = HTML::Entities::encode($val) if $val =~ /\W/;







More information about the interchange-cvs mailing list