From 849e28c79f3d3e19db3429f965b10426362fe04f Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sat, 5 Feb 2005 21:00:50 +0000
Subject: [PATCH] fix problem fpr perl < 5.6

---
 Changes        | 1 +
 perl/Thingy.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index eabf6097..1b5f587c 100644
--- a/Changes
+++ b/Changes
@@ -3,6 +3,7 @@
 mail not being deleted until a restart was done.
 2. As well as a duplicate check on existing bulletins, I have added a check 
 the message is not (already) too old. 
+3. fix problem for perl < 5.6 in Thingy.pm 
 03Feb05=======================================================================
 1. Added latest Spanish translations courtesy of Angel EA7WA.
 2. Force all languages to use pr in en in Messages, as the prompt is
diff --git a/perl/Thingy.pm b/perl/Thingy.pm
index 2483d273..61068e06 100644
--- a/perl/Thingy.pm
+++ b/perl/Thingy.pm
@@ -50,7 +50,7 @@ sub send
 	} else {
 		no strict 'refs';
 		my $sub = "gen_$class";
-		push @out, $thing->$sub if $thing->can($sub);
+		push @out, $thing->$sub() if $thing->can($sub);
 	}
 	$chan->send(@out) if @out;
 }
-- 
2.34.1