--- igal	Tue Apr 27 13:11:55 2004
+++ kigal	Tue Apr 27 13:15:25 2004
@@ -435,13 +435,13 @@
 				if ($opt_bigy) {
 					$slide = $slideprefix . $imgfiles[$i];
 					if ($HAVEIM) {
-						$line =~ s/(<.*)<!--THIS-IMAGE-->(.)(.*>)/<A href=\"$imgfiles[$i]\">$1$slide$2 width=$xdim[$i] height=$ydim[$i] alt=\"$title\" title=\"click to see full-size\"$3<\/a>/;
+						$line =~ s/(<.*)<!--THIS-IMAGE-->(.)(.*>)/<a href=\"$imgfiles[$i]\">$1$slide$2 width=\"$xdim[$i]\" height=\"$ydim[$i]\" alt=\"$title\" title=\"click to see full-size\"$3<\/a>/;
 					} else {
-						$line =~ s/(<.*)<!--THIS-IMAGE-->(.)(.*>)/<A href=\"$imgfiles[$i]\">$1$slide$2 alt=\"$title\" title=\"click to see full-size\"$3<\/a>/;
+						$line =~ s/(<.*)<!--THIS-IMAGE-->(.)(.*>)/<a href=\"$imgfiles[$i]\">$1$slide$2 alt=\"$title\" title=\"click to see full-size\"$3<\/a>/;
 					}
 				} else {
 					if ($HAVEIM) {
-						$line =~ s/<!--THIS-IMAGE-->(.)/$imgfiles[$i]$1 width=$xdim[$i] height=$ydim[$i] alt=\"$title\"/g;
+						$line =~ s/<!--THIS-IMAGE-->(.)/$imgfiles[$i]$1 width=\"$xdim[$i]\" height=\"$ydim[$i]\" alt=\"$title\"/g;
 					} else {
 						$line =~ s/<!--THIS-IMAGE-->/$imgfiles[$i]/g;
 					}
@@ -521,15 +521,15 @@
 }
 # write out the tables with full rows
 for ($i = 1; $i <= $rows; $i++) {
-	print IXW "<TABLE border=0 cellspacing=0 cellpadding=$opt_p>\n";
-	print IXW "  <TR><TD class=\"tiled\" height=$opt_t colspan=", $opt_w+2, ">&nbsp;</TD></TR>\n" unless ($opt_r);
-	print IXW "  <TR>\n    <TD class=\"thumb\">&nbsp;</TD>\n";
+	print IXW "<table>\n";
+	print IXW "  <tr><td class=\"tiled\" height=$opt_t colspan=", $opt_w+2, ">&nbsp;</td></tr>\n" unless ($opt_r);
+	print IXW "  <tr>\n    <td class=\"thumb\">&nbsp;</td>\n";
 	for ($j = 1; $j <= $opt_w; $j++) {
-		print IXW "    <TD class=\"thumb\">\n      ";
+		print IXW "    <td class=\"thumb\">\n      ";
 		if ($opt_s) {
-			print IXW "<A href=\"", $imgfiles[($i-1)*$opt_w+$j-1], "\">";
+			print IXW "<a href=\"", $imgfiles[($i-1)*$opt_w+$j-1], "\">";
 		} else {
-			print IXW "<A href=\"", $slides[($i-1)*$opt_w+$j-1], "\">";
+			print IXW "<a href=\"", $slides[($i-1)*$opt_w+$j-1], "\">";
 		}
 		print ".";
 		$altname = $captions[($i-1)*$opt_w+$j-1];
@@ -537,47 +537,47 @@
 		if ($HAVEIM) {
 			$temp = `identify -ping -format \"\%wx\%h\" \"$opt_d/$thumb\"`;
 			$temp =~ m/(\d+)x(\d+)/;  $x=$1;  $y=$2;
-			print IXW "<IMG src=\"$thumb\" width=$x height=$y alt=\"$altname\" title=\"$altname\" border=0>";
+			print IXW "<img src=\"$thumb\" width=\"$x\" height=\"$y\" alt=\"$altname\" title=\"$altname\" />";
 		} else {
-			print IXW "<IMG src=\"$thumb\" alt=\"$altname\" title=\"$altname\" border=0>";
+			print IXW "<Img src=\"$thumb\" alt=\"$altname\" title=\"$altname\" />";
 		}
-		print IXW "</A></TD>\n";
+		print IXW "</a></td>\n";
 	}
-	print IXW "    <TD class=\"thumb\">&nbsp;</TD>\n  </TR>\n";
-	print IXW "  <TR><TD class=\"tiled\" height=$opt_t colspan=", $opt_w+2, ">&nbsp;</TD></TR>\n" unless ($opt_r);
+	print IXW "    <td class=\"thumb\">&nbsp;</td>\n  </tr>\n";
+	print IXW "  <tr><td class=\"tiled\" height=\"$opt_t\" colspan=\"", $opt_w+2, "\">&nbsp;</td></tr>\n" unless ($opt_r);
 	if (($opt_a or $opt_ad or $opt_as) and $HAVEIM) {
-		print IXW "  <TR>\n    <TD>&nbsp;</TD>\n";
+		print IXW "  <tr>\n    <td>&nbsp;</td>\n";
 		for ($j = 1; $j <= $opt_w; $j++) {
-			print IXW "    <TD>";
+			print IXW "    <td>";
 			$printdim = "$isiz[($i-1)*$opt_w+$j-1]" if $opt_as;
 			$printdim = "$xdim[($i-1)*$opt_w+$j-1]x$ydim[($i-1)*$opt_w+$j-1]" if $opt_ad;
 			$printdim = "$xdim[($i-1)*$opt_w+$j-1]x$ydim[($i-1)*$opt_w+$j-1] ($isiz[($i-1)*$opt_w+$j-1])" if $opt_a;
 			print IXW $printdim;
-			print IXW "</TD>\n";
+			print IXW "</td>\n";
 		}
-		print IXW "  </TR>\n";
+		print IXW "  </tr>\n";
 	}
 #	write image captions under images if option -u is given
 	if ($opt_u) {
-		print IXW "  <TR>\n    <TD>&nbsp;</TD>\n";
+		print IXW "  <tr>\n    <td>&nbsp;</td>\n";
 		for ($j = 1; $j <= $opt_w; $j++) {
-			print IXW "    <TD>$captions[($i-1)*$opt_w+$j-1]</TD>\n";
+			print IXW "    <td>$captions[($i-1)*$opt_w+$j-1]</td>\n";
 		}
-		print IXW "  </TR>\n";
+		print IXW "  </tr>\n";
 	}
-	print IXW "</TABLE>\n<BR>\n";
+	print IXW "</table>\n<br />\n";
 }
 # write out the incomplete row if it exists
 if ($rem >= 1) {
-	print IXW "<TABLE border=0 cellspacing=0 cellpadding=$opt_p>\n";
-	print IXW "  <TR><TD class=\"tiled\" height=$opt_t colspan=", $rem+2, ">&nbsp;</TD></TR>\n" if (! $opt_r);
-	print IXW "  <TR>\n    <TD class=\"thumb\">&nbsp;</TD>\n";
+	print IXW "<table>\n";
+	print IXW "  <tr><td class=\"tiled\" height=$opt_t colspan=", $rem+2, ">&nbsp;</td></tr>\n" if (! $opt_r);
+	print IXW "  <tr>\n    <td class=\"thumb\">&nbsp;</td>\n";
 	for ($i = 1; $i <= $rem; $i++) {
-		print IXW "    <TD class=\"thumb\">\n      ";
+		print IXW "    <td class=\"thumb\">\n      ";
 		if ($opt_s) {
-			print IXW "<A href=\"", $imgfiles[$rows*$opt_w+$i-1], "\">";
+			print IXW "<a href=\"", $imgfiles[$rows*$opt_w+$i-1], "\">";
 		} else {
-			print IXW "<A href=\"", $slides[$rows*$opt_w+$i-1], "\">";
+			print IXW "<a href=\"", $slides[$rows*$opt_w+$i-1], "\">";
 		}
 		print ".";
 		$altname = $captions[$rows*$opt_w+$i-1];
@@ -585,35 +585,35 @@
 		if ($HAVEIM) {
 			$temp = `identify -ping -format \"\%wx\%h\" \"$opt_d/$thumb\"`;
 			$temp =~ m/(\d+)x(\d+)/;  $x=$1;  $y=$2;
-			print IXW "<IMG src=\"$thumb\" width=$x height=$y alt=\"$altname\" title=\"$altname\" border=0>";
+			print IXW "<img src=\"$thumb\" width=\"$x\" height=\"$y\" alt=\"$altname\" title=\"$altname\" />";
 		} else {
-			print IXW "<IMG src=\"$thumb\" alt=\"$altname\" title=\"$altname\" border=0>";
+			print IXW "<img src=\"$thumb\" alt=\"$altname\" title=\"$altname\" />";
 		}
-		print IXW "</A></TD>\n";
+		print IXW "</a></td>\n";
 	}
-	print IXW "    <TD class=\"thumb\">&nbsp;</TD>\n  </TR>\n";
-	print IXW "  <TR><TD class=\"tiled\" height=$opt_t colspan=", $rem+2, ">&nbsp;</TD></TR>\n" if (! $opt_r);
+	print IXW "    <td class=\"thumb\">&nbsp;</td>\n  </tr>\n";
+	print IXW "  <tr><td class=\"tiled\" height=$opt_t colspan=\"", $rem+2, "\">&nbsp;</td></tr>\n" if (! $opt_r);
 	if (($opt_a or $opt_ad or $opt_as) and $HAVEIM) {
-		print IXW "  <TR>\n    <TD>&nbsp;</TD>\n";
+		print IXW "  <tr>\n    <td>&nbsp;</td>\n";
 		for ($i = 1; $i <= $rem; $i++) {
-			print IXW "    <TD>";
+			print IXW "    <td>";
 			$printdim = "$isiz[$rows*$opt_w+$i-1]" if $opt_as;
 			$printdim = "$xdim[$rows*$opt_w+$i-1]x$ydim[$rows*$opt_w+$i-1]" if $opt_ad;
 			$printdim = "$xdim[$rows*$opt_w+$i-1]x$ydim[$rows*$opt_w+$i-1] ($isiz[$rows*$opt_w+$i-1])" if $opt_a;
 			print IXW $printdim;
-			print IXW "</TD>\n";
+			print IXW "</td>\n";
 		}
-		print IXW "  </TR>\n";
+		print IXW "  </tr>\n";
 	}
 #	write image captions under images if option -u is given
 	if ($opt_u) {
-		print IXW "  <TR>\n    <TD>&nbsp;</TD>\n";
+		print IXW "  <tr>\n    <td>&nbsp;</td>\n";
 		for ($i = 1; $i <= $rem; $i++) {
-			print IXW "    <TD>$captions[$rows*$opt_w+$i-1]</TD>\n";
+			print IXW "    <td>$captions[$rows*$opt_w+$i-1]</td>\n";
 		}
-		print IXW "  </TR>\n";
+		print IXW "  </tr>\n";
 	}
-	print IXW "</TABLE>\n<BR>\n";
+	print IXW "</table>\n<br />\n";
 }
 while (!(<IXR> =~ m/\*{10}/)) {};
 while (defined($line = <IXR>)) {