# HG changeset patch
# User devi
# Date 1132685206 -7200
# Node ID 466bea239d25e7a4dd6c6117f65824fbc2884aaf
# Parent  219389279acbdcf16002cfb91555c4e4b9dfac3f
1) В случае, если команда является повторяющейся,
показывать только последнюю версию команды.
2) lm-install неправильно определял hostname в  FreeBSD. Исправлено.

diff -r 219389279acb -r 466bea239d25 l3-frontend
--- a/l3-frontend	Fri Nov 18 17:46:09 2005 +0200
+++ b/l3-frontend	Tue Nov 22 20:46:46 2005 +0200
@@ -513,6 +513,7 @@
 		# <command>
 
 		my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime($cl->{time});
+		next if $Stat{LastCommand} == $cl->{time};
 		$Stat{FirstCommand} = $cl->{time} unless $Stat{FirstCommand};
 		$Stat{LastCommand} = 0 unless defined $Stat{LastCommand};	
 		$Stat{TotalTime} += $cl->{time} - $Stat{LastCommand}
diff -r 219389279acb -r 466bea239d25 lm
--- a/lm	Fri Nov 18 17:46:09 2005 +0200
+++ b/lm	Tue Nov 22 20:46:46 2005 +0200
@@ -497,8 +497,8 @@
 
 ###install-pm
 scp PM/* $ssh_user@$host:/tmp
-ssh $ssh_user@$host 'cd /tmp; tar xfz Term-VT102*.gz; cd Term-VT102*[^z]; perl Makefile.PL; make ; make install'
-#ssh $ssh_user@$host 'cd /tmp; tar xfz Text-Iconv*.gz; cd Text-Iconv*[^z]; perl Makefile.PL; make ; make install'
+#ssh $ssh_user@$host 'cd /tmp; tar xfz Term-VT102*.gz; cd Term-VT102*[^z]; perl Makefile.PL; make ; make install'
+ssh $ssh_user@$host 'cd /tmp; tar xfz Text-Iconv*.gz; cd Text-Iconv*[^z]; perl Makefile.PL; make ; make install'
 
 ###copy-lablogs
 for i in $dirs
diff -r 219389279acb -r 466bea239d25 lm-install
--- a/lm-install	Fri Nov 18 17:46:09 2005 +0200
+++ b/lm-install	Tue Nov 22 20:46:46 2005 +0200
@@ -92,7 +92,8 @@
 	login_from=`who | grep "${tty##/dev/}" | awk '{print $6;}' | tr -d '()'`
 	[ -n "$bsd" ] && login_from="" #FIXME!
 	start_time=`date +%s`
-	hostname=`hostname -f`
+	hostname=`hostname -f 2> /dev/null`
+	[ -n "$bsd" ] && hostname=`hostname`
 
 	cat <<INFO > $LMHOME/${session_id}.info
 <session>