diff -r 9753c956398c -r b0b16e440460 tele-watch.pl --- a/tele-watch.pl Sun Mar 01 18:42:08 2009 +0100 +++ b/tele-watch.pl Mon Mar 02 11:59:08 2009 +0100 @@ -172,7 +172,7 @@ my $fullname = $e->fullname; if ($e->IN_CREATE) { - notice "new dir $fullname"; + notice "CREATE dir $fullname"; # find the owner and permissions my ($uid, $gid, $mode) = (stat $fullname)[ 4, 5, 2 ]; @@ -197,12 +197,13 @@ } if ($e->IN_MOVED_FROM) { - notice "$fullname moves away, set cookie"; + notice "MOVED_FROM $fullname, set cookie"; $COOKIE{ $e->{cookie} } = $e->{name}; next EVENT; } if ($e->IN_MOVED_TO) { + notice "MOVED_TO $fullname"; if (!exists($COOKIE{ $e->{cookie} })) { warn "no known source for $fullname\n"; @@ -211,7 +212,7 @@ my $from = $COOKIE{ $e->{cookie} }; my $from_base = basename $from; - notice "$fullname moved here from $from"; + notice "moved here from $from"; # change the link targets @@ -239,6 +240,8 @@ } if ($e->IN_DELETE) { + notice "DELETE $fullname"; + foreach my $dir (grep { -d } dir "$target/") { -d "$dir/,old"