lilalo

diff l3-agent @ 88:385499ec544a
Начал работу над текстовым представлением +
редактором журнала.
Пока что в textarea выводится текстовое представление.

Редактировать можно, но сохранять пока нельзя.

Пытался сделать автоматическое позиционирование курсора
на нужную строку.
Во-первых, не работает в Konqueror и с этим, я так понимаю,
ничего пока сделать нельзя.

Во-вторых, неверно вычисляется строка на которую нужно
позиционировать курсор.

Это, я думаю, можно подправить.

Потом, что-то намутил с utf8. Надо будет более детально
это рассмотреть
author: devi
date: Thu Mar 02 00:06:54 2006 +0200 (2006-03-02)
parents: 3f92cd706473
children: 4c02cf4123ee
     1.1 --- a/l3-agent	Sat Feb 25 08:22:20 2006 +0200
     1.2 +++ b/l3-agent	Thu Mar 02 00:06:54 2006 +0200
     1.3 @@ -582,14 +582,22 @@
     1.4      }
     1.5  
     1.6      @Command_Lines_Index = sort {
     1.7 -        defined($Command_Lines[$index[$a]]->{"time"}) 
     1.8 +           defined($Command_Lines[$index[$a]]->{"time"}) 
     1.9 +        && defined($Command_Lines[$index[$b]]->{"time"}) 
    1.10          ?  $Command_Lines[$index[$a]]->{"time"} <=> $Command_Lines[$index[$b]]->{"time"} 
    1.11          :  defined($Command_Lines[$index[$a]]->{"day"})
    1.12 -        ?  $Command_Lines[$index[$a]]->{"day"} cmp $Command_Lines[$index[$b]]->{"day"} 
    1.13 -        || $Command_Lines[$index[$a]]->{"hour"} <=> $Command_Lines[$index[$b]]->{"hour"}
    1.14 -        || $Command_Lines[$index[$a]]->{"min"} <=> $Command_Lines[$index[$b]]->{"min"} 
    1.15 -        || $Command_Lines[$index[$a]]->{"sec"} <=> $Command_Lines[$index[$b]]->{"sec"}
    1.16 -        :  0
    1.17 +           && defined($Command_Lines[$index[$b]]->{"day"})
    1.18 +           && defined($Command_Lines[$index[$a]]->{"hour"})
    1.19 +           && defined($Command_Lines[$index[$b]]->{"hour"})
    1.20 +           && defined($Command_Lines[$index[$a]]->{"min"})
    1.21 +           && defined($Command_Lines[$index[$b]]->{"min"})
    1.22 +           && defined($Command_Lines[$index[$a]]->{"sec"})
    1.23 +           && defined($Command_Lines[$index[$b]]->{"sec"})
    1.24 +           ?  $Command_Lines[$index[$a]]->{"day"} cmp $Command_Lines[$index[$b]]->{"day"} 
    1.25 +           || $Command_Lines[$index[$a]]->{"hour"} <=> $Command_Lines[$index[$b]]->{"hour"}
    1.26 +           || $Command_Lines[$index[$a]]->{"min"} <=> $Command_Lines[$index[$b]]->{"min"} 
    1.27 +           || $Command_Lines[$index[$a]]->{"sec"} <=> $Command_Lines[$index[$b]]->{"sec"}
    1.28 +           :  0
    1.29      } @index;
    1.30  
    1.31      print "finished\n" if $Config{"verbose"} =~ /y/;
author	devi
date	Thu Mar 02 00:06:54 2006 +0200 (2006-03-02)
parents	3f92cd706473
children	4c02cf4123ee