# HG changeset patch
# User devi
# Date 1118056952 -10800
# Node ID 6932824b39c1ca678ad4ab3f223f0c6b9e56b99e
# Parent 8d40b1921934060947bd2cd7348b29b4824c0252
Разбивка по дням
diff -r 8d40b1921934 -r 6932824b39c1 lm
--- a/lm Sat Jun 04 17:58:20 2005 +0300
+++ b/lm Mon Jun 06 14:22:32 2005 +0300
@@ -24,7 +24,7 @@
"l3-report" => "./lm-report",
# Каталоги
- "path_lilalo" => "/var/labmaker/",
+ "path_lilalo" => "/var/lilalo/",
"path_classes" => "/var/lilalo/classes/",
"path_lablogs" => "/var/lilalo/lablogs/",
"courses_path" => "/var/lilalo/courses/",
diff -r 8d40b1921934 -r 6932824b39c1 lm-report
--- a/lm-report Sat Jun 04 17:58:20 2005 +0300
+++ b/lm-report Mon Jun 06 14:22:32 2005 +0300
@@ -724,9 +724,11 @@
my $cl;
my $last_tty="";
+ my $last_day="";
my $in_range=0;
for my $i (@Command_Lines_Index) {
+
$cl = $Command_Lines[$i];
if ($Config{"from"} && $cl->{"cline"} =~ /$Config{"signature"}\s*$Config{"from"}/) {
@@ -795,6 +797,13 @@
if ($format eq "html") {
+
+ # DAY CHANGE
+ if ( $last_day ne $cl->{"day"}) {
+ print OUT "День ",$cl->{"day"}," | ";
+ $last_day=$cl->{"day"};
+ }
+
# CONSOLE CHANGE
if ( $last_tty ne $cl->{"tty"}) {
print OUT " |
";