--- trunk/back2html.pm	2003/02/23 07:04:36	27
+++ trunk/back2html.pm	2003/07/04 20:41:17	64
@@ -11,10 +11,13 @@
 	foreach $line (split(/###/,$html)) {
 		$out .= "<tr><td>";
 		my @items = split(/#-#/,$line);
+		if ($items[1] =~ m#^http://#) {
+			$items[1] = "<a href=\"$items[1]\">$items[1]</a>";
+		}
 		$out .= join("</td><td>",@items);
 		$out .= "</td></tr>\n";
 	}
-	$out =~ s/&lt;br/*&gt;/<br\/>/g;
+	$out =~ s/&lt;br\/*&gt;/<br\/>/g;
 	return $out;
 }