X-Git-Url: http://git.jankratochvil.net/?a=blobdiff_plain;f=WebConfig.pm;h=c95e8cad03e55cf44f409f738e1162a8b6a55f5e;hb=ebaa241877ed4eb0c79f48ec38ba4ce6d2540651;hp=5160bd268936e767ad6926552cf94eee352f42a2;hpb=de55841306665fcb733ed980d44034b2b8d1efd2;p=www.jankratochvil.net.git

diff --git a/WebConfig.pm b/WebConfig.pm
index 5160bd2..c95e8ca 100644
--- a/WebConfig.pm
+++ b/WebConfig.pm
@@ -89,11 +89,6 @@ 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";
@@ -107,20 +102,16 @@ if ($r=~/resumejankratochvil.pm/) {
 		"footing_delimit_sub_push"=>sub () {
 			return if $My::Web::W->{"no_job"};
 			print <<"HERE";
-<table border="0" style="margin: 4ex; padding: 2ex; background: #552222;">
+<table border="0" style="padding: 2ex; background: #552222; color: white;" class="margin-center">
 	<tr><td>
-		<b>A programmer for hire:</b>
-		<span style="color: #ffaaaa;">
-			I am looking for new challenges.
-			If you find the software here useful, please
-			@{[ My::Web::a_href($My::Web::W->{"resume_url"},'consider me') ]}
-			for your next software project.
-		</span>
+		<b>Contractor - Software Engineer:</b>
+		Please check if your planned project
+		@{[ My::Web::a_href($My::Web::W->{"resume_url"},'matches my experience',"attr"=>'style="color: inherit;"') ]},
 	</td></tr>
 </table>
 HERE
 			},
-		"no_job"=>1,
+		"no_job"=>0,
 		"css_inherit"=>1,
 		);