--- trunk/bin/irc-logger.pl	2011/10/08 18:33:36	149
+++ trunk/bin/irc-logger.pl	2011/10/08 18:43:21	150
@@ -582,6 +582,12 @@
 
 
 if ($import_dircproxy) {
+	my ( $from_time, $date_time ) = $dbh->selectrow_array(qq{
+		select date_part('epoch',max(time)),max(time) from log
+	});
+
+	warn "IMPORT $date_time [$from_time]\n";
+
 	open(my $l, $import_dircproxy) || die "can't open $import_dircproxy: $!";
 	warn "importing $import_dircproxy...\n";
 	my $tz_offset = 1 * 60 * 60;	# TZ GMT+2
@@ -590,6 +596,8 @@
 		if (/^@(\d+)\s(\S+)\s(.+)$/) {
 			my ($time, $nick, $msg) = ($1,$2,$3);
 
+			next if $time <= $from_time;
+
 			my $dt = DateTime->from_epoch( epoch => $time + $tz_offset );
 
 			my $me = 0;