--- trunk/Nos.pm	2005/08/29 15:43:23	84
+++ trunk/Nos.pm	2005/08/31 16:53:21	85
@@ -1219,15 +1219,15 @@
 
 	if ($_[0] !~ m/^HASH/) {
 		die "need at least list or email" unless (scalar @_ < 2);
-		return $nos->received_messages(
+		return \@{ $nos->received_messages(
 			list => $_[0], email => $_[1],
 			from_date => $_[2], to_date => $_[3],
 			message => $_[4]
-		);
+		) };
 	} else {
 		my $arg = shift;
 		die "need list or email argument" unless ($arg->{'list'} || $arg->{'email'});
-		return $nos->received_messages( %{ $arg } );
+		return \@{ $nos->received_messages( %{ $arg } ) };
 	}
 }