X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FFilter.pm;h=11143825710de95d30a2f649a6449986fb34193d;hb=412fb1b9e4070d7791f4e986b55bbc0c06f612ea;hp=f9fa611a8ef37ad4d931d4d1a4a862d8fc4fa1a7;hpb=60d889442d24ab5567fe0b6c9bb923f4297a07bd;p=spider.git

diff --git a/perl/Filter.pm b/perl/Filter.pm
index f9fa611a..11143825 100644
--- a/perl/Filter.pm
+++ b/perl/Filter.pm
@@ -517,7 +517,9 @@ sub cmd
 	return $dxchan->msg('filter5') unless $line;
 
 	my ($r, $filter, $fno, $user, $s) = $self->parse($dxchan, $sort, $line);
-	return (1,$filter) if $r;
+	my $u = DXUser->get_current($user);
+	return (1, $dxchan->msg('isow', $user)) if $u && $u->isolate;
+	return (1, $filter) if $r;
 
 	my $fn = "filter$fno";