lilalo

diff l3-frontend @ 141:c48bd05dca85

find changesets by author, revision, files, or words in the commit message
Восстановлена поддержка сеансов и начальная поддержка правок


Теперь можно посмотреть на команды одного
сеанса; для этого нужно воспользоваться ссылкой,
на строке в начале открытия терминала.

Появилась начальная поддержка правок.
Кнопка [ править ] на странице
открывает окно, где можно редактировать
текстовое представление журнала.
Правда, оно пока что не сохраняется.
author igor@chub.in
date Mon Jul 21 16:44:11 2008 +0300 (2008-07-21)
parents 31ebdfe9797d
children 2c9ea8e4fa14
line diff
     1.1 --- a/l3-frontend	Thu Jul 10 01:52:40 2008 +0300
     1.2 +++ b/l3-frontend	Mon Jul 21 16:44:11 2008 +0300
     1.3 @@ -103,12 +103,12 @@
     1.4  {
     1.5      if ($Config{filter}) {
     1.6          # Инициализация фильтра
     1.7 -        for (split /&/,$Config{filter}) {
     1.8 -            my ($var, $val) = split /=/;
     1.9 +        for (split /;;/,$Config{filter}) {
    1.10 +            my ($var, $val) = split /::/;
    1.11              $filter{$var} = $val || "";
    1.12          }
    1.13      }
    1.14 -    $filter_url = join ("&", map("$_=$filter{$_}", keys %filter));
    1.15 +    $filter_url = join (";;", map("$_::$filter{$_}", keys %filter));
    1.16  }
    1.17  
    1.18  # extract_from_cline
    1.19 @@ -754,7 +754,7 @@
    1.20          if ( $last_session ne $cl->{"local_session_id"}) {
    1.21              my $tty;
    1.22              if (defined $Sessions{$cl->{"local_session_id"}}->{"tty"}) {
    1.23 -                $this_day_result .= "<div class='ttychange'><a href='?local_session_id=".$cl->{"local_session_id"}."'>"
    1.24 +                $this_day_result .= "<div class='ttychange'><a href='?filter=local_session_id::".$cl->{"local_session_id"}."'>"
    1.25                                  . $Sessions{$cl->{"local_session_id"}}->{"tty"}
    1.26                                  ."</a></div>";
    1.27              }
    1.28 @@ -996,7 +996,7 @@
    1.29      if ($Config{filter}) {
    1.30          # Инициализация фильтра
    1.31          for (split /&/,$Config{filter}) {
    1.32 -            my ($var, $val) = split /=/;
    1.33 +            my ($var, $val) = split /::/;
    1.34              $filter{$var} = $val || "";
    1.35          }
    1.36      }
    1.37 @@ -1380,7 +1380,7 @@
    1.38  
    1.39  
    1.40      <div class='edit_link'>
    1.41 -    [ <a href='?action=edit&$filter_url'>править</a> ]
    1.42 +    [ <a href='?filter=action::edit;;$filter_url'>править</a> ]
    1.43      </div>
    1.44      <h1 onmouseover="myHint.show('1')" onmouseout="myHint.hide()" class='lined_header'>Журнал лабораторных работ</h1>
    1.45  HEADER