From 60a1c2ce7aab5041970857760b470d07b2c94b25 Mon Sep 17 00:00:00 2001
From: short <>
Date: Wed, 19 Nov 2003 14:49:16 +0000
Subject: [PATCH] +CGI argument 'Wabs' to produce absolute HREFs/SRCs.

---
 resume/Resume-JanKratochvil.html.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/resume/Resume-JanKratochvil.html.pl b/resume/Resume-JanKratochvil.html.pl
index c9d2606..627ef5b 100755
--- a/resume/Resume-JanKratochvil.html.pl
+++ b/resume/Resume-JanKratochvil.html.pl
@@ -269,7 +269,7 @@ if (lc($W->{"args"}{"referees"}) ne "referees") {
 	print <<"HERE";
 		<tr><td style="padding: 10px;" colspan="2">
 			<hr />
-			<form method="post" action="@{[ $W->{"resume_url"} ]}">
+			<form method="post" action="@{[ top_dir $W->{"resume_url"} ]}">
 				<p>Enter the word '<b>referees</b>' (without quotes) to disclose e-mail addresses:</p>
 				<input type="text" size="15" name="referees" value="@{[ CGI::escapeHTML($W->{"args"}{"referees"}) ]}" />
 				<input type="submit" value="Submit" />
-- 
1.8.3.1