-referees

[www.jankratochvil.net.git] / resume / ResumeJanKratochvil.pm

diff --git a/resume/ResumeJanKratochvil.pm b/resume/ResumeJanKratochvil.pm
index 8ca3d5e..5fc46a5 100644 (file)
--- a/resume/ResumeJanKratochvil.pm
+++ b/resume/ResumeJanKratochvil.pm
@@ -314,45 +314,6 @@ print <<"HERE";
                <td>StampMan: Database application @{[ techs 'MS-DOS: Pascal, plainTeX' ]}</td></tr>
 </table>
 
-@{[ vskip "1ex" ]}
-
-<table class="referees">
-<caption>Contractor Jobs Referees (reversed chronological order)</caption>
-<tr><td class="com">@{[ a_href('http://www.sun.com/','Sun Microsystems') ]}</td>
-               @{[ &{$reference}('xnery.mngybhxny(ng)fha.pbz','Karel Zatloukal') ]}</tr>
-<tr><td class="com">@{[ a_href('http://www.atspraha.cz/','Advanced Telecom Services') ]}</td>
-               @{[ &{$reference}('zvpuny.ubenx(ng)ngfcenun.pm','Michal Horak') ]}</tr>
-<tr><td class="com">@{[ a_href('http://www.readynote.com/','ReadyNote') ]}</td>
-               @{[ &{$reference}('wcehrgg(ng)ernqlabgr.pbz','Jim Pruett') ]}</tr>
-<tr><td class="com">@{[ a_href('http://www.jklabs.cz/','JKLabs') ]}</td>
-               @{[ &{$reference}('wna.xbyne(ng)wxynof.pm','Jan Kolar') ]}</tr>
-<tr><td class="com">@{[ a_href('http://www.gtsgroup.cz/','GTS') ]}</td>
-               @{[ &{$reference}('Zvpunry.Znprx(ng)tgftebhc.pm','Michael Macek') ]}</tr>
-<tr><td class="com">@{[ a_href('http://www.unicom-prague.cz/','Unicom') ]}</td>
-               @{[ &{$reference}('erprcpr(ng)havpbz-centhr.pm','Valerie Bernardova') ]}</tr>
-<tr><td class="com">@{[ a_href('http://www.geoinvest.cz/','Geoinvest') ]}</td>
-               @{[ &{$reference}('ohgna(ng)trbvairfg.pm','Lubor Otta') ]}</tr>
-<tr><td class="com">@{[ a_href('http://www.tencom.cz/','TENcom Trade') ]}</td>
-               @{[ &{$reference}('grfne(ng)grapbz.pm','Petr Tesar') ]}</tr>
-HERE
-
-if (lc($W->{"args"}{"referees"}) ne "referees") {
-       print <<"HERE";
-               <tr><td style="padding: 10px;" colspan="2">
-                       <hr />
-                       <form action="@{[ uri_escaped(path_web $W->{"resume_url"}) ]}" @{[ form_method "post" ]}>
-                               <p>Enter the word '<b>referees</b>' (without quotes) to disclose e-mail addresses:<br />
-                               <input type="text" size="15" name="referees" value="@{[ escapeHTML($W->{"args"}{"referees"}) ]}" /><br />
-                               <input type="submit" value="Submit" /><br />
-                               (spambot protection)</p>
-                       </form>
-               </td></tr>
-HERE
-       }
-
-print <<"HERE";
-</table>
-
 @{[ vskip "2ex" ]}
 
 <table>