\n";
+ $this_day_result .= "
\n" . $cline ; #cline
+ $this_day_result .= "
\n"
+ . "\n"
+ . "\n" if $cl->{"err"};
+ $this_day_result .= "
\n"; #cline
# OUTPUT
my $last_command = $cl->{"last_command"};
@@ -663,15 +683,12 @@
$Config{"suppress_pagers"} =~ /^y/i && grep ($_ eq $last_command, @{$Config{"pagers"}}) ||
$Config{"suppress_terminal"}=~ /^y/i && grep ($_ eq $last_command, @{$Config{"terminal"}})
)) {
- $this_day_result .= "
" . $output . "
\n";
+ $this_day_result .= "
\n" . $output . "
\n";
}
# DIFF
- if ( $Config{"show_diffs"} =~ /^y/i && $cl->{"diff"}) {
- $this_day_result .= "
| "
- . $cl->{"diff"}
- . " |
";
- }
+ $this_day_result .= "
".$cl->{"diff"}."
"
+ if ( $Config{"show_diffs"} =~ /^y/i && $cl->{"diff"});
#NOTES
if ( $Config{"show_notes"} =~ /^y/i && $cl->{"note"}) {
@@ -680,29 +697,29 @@
if (not $note =~ s@(http:[a-zA-Z.0-9/_?%-]*)@
$1@g) {
$note =~ s@(www\.[a-zA-Z.0-9/_?%-]*)@
$1@g;
};
- # Ширину пока не используем
- # $this_day_result .= "
";
- $this_day_result .= "";
- $this_day_result .= "".$cl->{note_title}." |
" if $cl->{note_title};
- $this_day_result .= "".$note." |
";
- $this_day_result .= "
\n";
+ $this_day_result .= "";
+ $this_day_result .= "
".$cl->{note_title}."
" if $cl->{note_title};
+ $this_day_result .= "
".$note."
";
+ $this_day_result .= "
\n";
}
# COMMENT
if ( $Config{"show_comments"} =~ /^y/i) {
my $comment = make_comment($cl->{"cline"});
if ($comment) {
- $this_day_result .= " | "
- . ""
+ $this_day_result .=
+ ""
. $comment
- . " \n"
- . " |
";
+ . "\n"
+ ;
+
}
}
# Вывод очередной команды окончен
- $this_day_result .= "\n";
- $this_day_result .= "\n";
+ $this_day_result .= "\n"; # cblock
+ $this_day_result .= "
\n"
+ . "
\n"; # command
}
last: {
$result .= "