lilalo

diff l3-frontend @ 101:c41cc9a4b5ea

* Пофиксил ошибку с неправильной кодировкой mywi-хинтов.
* Подготовил к переходу в иерархию /l3/
** Исправил пути для стилей,
** Забацал красивый l3-cgi-lite


l3-cgi-lite пока что не доделан до нужного уровня,
но я его скоро дорисую.
Уже сейчас это намного более качественный скрипт
через уродский l3-cgi

Он, конечно, поработал в свое время,
но лучше его заменить l3-cgi-lite


Из функционала добавилось:
* Кэширование страниц в html
* Навигация по каталогам
* Навигационная строка в журнале сверху
author devi
date Sat Jun 24 22:53:37 2006 +0300 (2006-06-24)
parents 05e99d32f1f5
children 6fce4641575b
line diff
     1.1 --- a/l3-frontend	Mon Jun 12 09:32:18 2006 +0300
     1.2 +++ b/l3-frontend	Sat Jun 24 22:53:37 2006 +0300
     1.3 @@ -174,16 +174,18 @@
     1.4  
     1.5  sub mywi_client
     1.6  {
     1.7 -    return "";
     1.8 +    #return "";
     1.9      my $query = $_[0];
    1.10      my $mywi;
    1.11  
    1.12      open_mywi_socket;
    1.13      if ($Mywi_Socket) {
    1.14 +        binmode ":utf8", $Mywi_Socket;
    1.15          local $| = 1;
    1.16          local $/ = "";
    1.17          print $Mywi_Socket $query."\n";
    1.18          $mywi = <$Mywi_Socket>;
    1.19 +        utf8::decode($mywi);
    1.20          $mywi = "" if $mywi =~ /nothing app/;
    1.21      }
    1.22      close_mywi_socket;
    1.23 @@ -1049,6 +1051,7 @@
    1.24                .$SetCursorPosition_JS
    1.25                ."</script>"
    1.26                ."<body onLoad='setCursorPosition(document.all.mytextarea, $cursor_position, $cursor_position+10)'>"
    1.27 +              ."<div class='body'>"
    1.28                ."<h1>Журнал лабораторных работ. Правка</h1>"
    1.29                ."<form>"
    1.30                ."<textarea rows='30' cols='100' wrap='off' id='mytextarea'>$result</textarea>"
    1.31 @@ -1056,6 +1059,7 @@
    1.32                ."</form>"
    1.33                ."<p>Внимательно правим, потом сохраняем</p>"
    1.34                ."<p>Строки, начинающиеся символами #l3: можно трогать, только если точно знаешь, что делаешь</p>"
    1.35 +              ."</div>"
    1.36                ."</body>"
    1.37                ."</html>";
    1.38  
    1.39 @@ -1205,6 +1209,7 @@
    1.40      <title>$title</title>
    1.41      </head>
    1.42      <body>
    1.43 +    <div class='body'>
    1.44      <script>
    1.45      $Html_JavaScript
    1.46      </script>
    1.47 @@ -1289,7 +1294,7 @@
    1.48  
    1.49  sub print_footer_html
    1.50  {
    1.51 -    return "</body>\n</html>\n";
    1.52 +    return "</div></body>\n</html>\n";
    1.53  }
    1.54  
    1.55