sub cmd_catchtext
{
   my ($server, $msg, $target) = @_;
   my $murled;
   while ( $msg =~ m/(https*:\/\/[^ ]+)/ )
   {
      my $url = $1;
      next if $url =~ /^http:\/\/murl\.se/;
      my $murl = getMurl($url);
      $msg =~ s/\Q$url\E/$murl/;
      $murled++;
    }
   if ($murled)
   {
      Irssi::signal_stop();
      Irssi::signal_emit('message own_public', $server, $msg, $target);
   }
}