readme.html: Fixed link to Po Drátě

[minsk.git] / index.cgi

diff --git a/index.cgi b/index.cgi
index 394edafeaf0b15d9b9d837c35e90415c5d800957..8b4103d32adb8a0a0586ab4f00040358b32f26c5 100755 (executable)
--- a/index.cgi
+++ b/index.cgi
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
 use strict;
 use warnings;
 

-use lib '../lib';
+use lib '../../lib/perl';

 use UCW::CGI;
 use File::Temp;
 use POSIX;
 use UCW::CGI;
 use File::Temp;
 use POSIX;


@@ -50,7 +50,7 @@ if ($src ne '') {
        print $tmpf $src, "\n";
        $tmpf->flush();
        my $in = $tmpf->filename;
        print $tmpf $src, "\n";
        $tmpf->flush();
        my $in = $tmpf->filename;

-       open SIM, "./minsk --trace=$trace --cpu-quota=1000 --print-quota=100 <$in |" or die;
+       open SIM, "./minsk --set-password --trace=$trace --cpu-quota=1000 --print-quota=100 <$in |" or die;

        while (<SIM>) {
                print html_escape($_);
        }
        while (<SIM>) {
                print html_escape($_);
        }


@@ -74,12 +74,6 @@ EOF
 
 print <<EOF ;
 <hr>
 
 print <<EOF ;
 <hr>

-<p>Written by <a href='http://mj.ucw.cz/'>Martin Mareš</a>. Version 1.0 (2010-12-27).
+<p>Written by <a href='http://mj.ucw.cz/'>Martin Mareš</a> and Rutger van Bergen. Version 1.1 (2022-04-24).

 </body></html>
 EOF
 </body></html>
 EOF

-
-# FIXME:
-# - password
-# - utf-8 warning
-# - nice
-# - .htaccess