lilalo
diff l3-agent @ 83:bdc1f02d3f87
исправлена ошибка с подсказкой в приглашении
author | devi |
---|---|
date | Fri Feb 24 18:43:35 2006 +0200 (2006-02-24) |
parents | d9a700d48bef |
children | 2cb912bff2ea |
line diff
1.1 --- a/l3-agent Thu Feb 23 22:26:38 2006 +0200 1.2 +++ b/l3-agent Fri Feb 24 18:43:35 2006 +0200 1.3 @@ -127,7 +127,6 @@ 1.4 next if ($diff->{"local_session_id"} 1.5 && $cl->{"local_session_id"} 1.6 && ($cl->{"local_session_id"} ne $diff->{"local_session_id"})); 1.7 - print "diff of my session found\n"; 1.8 1.9 next if ($diff->{"day"} && $cl->{"day"} && ($cl->{"day"} ne $diff->{"day"})); 1.10 1.11 @@ -292,7 +291,8 @@ 1.12 1.13 $file =~ m@.*/(.*?)-.*@; 1.14 1.15 - print "\n+- processing file $file\n" if $Config{"verbose"} =~/y/; 1.16 + print "\n+- processing file $file\n| " 1.17 + if $Config{"verbose"} =~/y/; 1.18 1.19 my $tty = $1; 1.20 my $first_pass = 1; 1.21 @@ -485,7 +485,7 @@ 1.22 1.23 1.24 if ($Config{verbose} =~ /y/i) { 1.25 - print "\n| " if $commandlines_loaded % 15 == 1; 1.26 + print "\n| " if $commandlines_loaded % 5 == 1; 1.27 print " ",$cl{"last_command"}; 1.28 } 1.29