> Thanks, I will check it out. Will this change be integrated into the next > release of Embperl? > Yes, It's already in the cvs
> Btw, when will the next release happen? > Should have been happen some weeks ago, but I didn't had enought spare time. Hopefully I can release b9 at the weekend Gerald > Yatin > > ----- Original Message ----- > From: "Gerald Richter" <[EMAIL PROTECTED]> > To: "Yatin Chawathe" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]> > Sent: Friday, February 14, 2003 2:01 PM > Subject: Re: Extending HTML syntax > > > > > > > > Hi, > > > > > > $self->AddTag('epimg', ['width', 'height'], ['src'], undef, > > > { > > > perlcode => > > > 'my ($w, $h, $src); > > > $w = %&width%; > > > $h = %&height%; > > > $src = %&src%; > > > if (!defined $w && !defined $h) { > > > ($w, $h) = my_own_func_to_get_img_dimensions($src); > > > _ep_sa(%$t%, %$x%, "width", $w); > > > _ep_sa(%$t%, %$x%, "height", $h); > > > > XML::Embperl::DOM::iSetText(%$t%,%$x%, "img") ; > > > > > }', > > > }); > > > > > > > Use the above addition with the DOM.xs I attach you then it should work > (but > > I have not fully tested it) > > > > Gerald > > > > > --------------------------------------------------------------------- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]