From: short <>
Date: Sat, 19 Nov 2005 06:53:42 +0000 (+0000)
Subject: +FIXME: Catch the lowercasing bug.
X-Git-Url: http://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=commitdiff_plain;h=de55841306665fcb733ed980d44034b2b8d1efd2

+FIXME: Catch the lowercasing bug.
---

diff --git a/WebConfig.pm b/WebConfig.pm
index 1b3ea33..5160bd2 100644
--- a/WebConfig.pm
+++ b/WebConfig.pm
@@ -89,6 +89,11 @@ our %WebConfig=(
 												"attr"=>'style="text-decoration: inherit; /* revoke underline */;"'));
 							$r.="</td>\n";
 							}
+# FIXME: Catch the bug.
+if ($r=~/resumejankratochvil.pm/) {
+	use Carp qw(confess cluck);
+	cluck "LOWERCASED; resume_url=$resume_url";
+	}
 					$r.='</tr></table>'."\n";
 				$r.='</td>'."\n";
 			$r.='</tr></table>'."\n";