make things appear

[spider.git] / perl / Thingy / Rt.pm

diff --git a/perl/Thingy/Rt.pm b/perl/Thingy/Rt.pm
index 69cf3ca2ac39f021b54e699e735071be683ebd90..7f4072358f90cf45baa64ef47f7abd7174df13ca 100644 (file)
--- a/perl/Thingy/Rt.pm
+++ b/perl/Thingy/Rt.pm
@@ -30,7 +30,7 @@ sub gen_Aranea
                my @items;
                push @items, 't', $thing->{t} if $thing->{t};
                push @items, 'd', $thing->{d} if $thing->{d};
-               $thing->{Aranea} = Aranea::genmsg($thing, 'RT');
+               $thing->{Aranea} = Aranea::genmsg($thing, 'RT', @items) if @items;
        }
        return $thing->{Aranea};
 }