Refactor find_memos to use Hush::Memo

lib/Hush/List.pm

@@ -183,8 +183,9 @@ sub find_memos {
     if (@xtns) {
         # TODO: need local shielded balance to get data => need (t,z) xtn
 
+        my @memos =  map { Hush::Memo->new($rpc, $_) } @xtns;
 
-        # TODO: good datastructure for memo data
+        # debugging
         for my $xtn (@xtns) {
             printf "txid=%s memo=%s\n", $xtn->{txid}, $xtn->{memo};
         }

lib/Hush/Memo.pm

@@ -10,9 +10,9 @@ use JSON;
 sub new {
     my ($rpc,$options) = @_;
     my $memo           = {
-        txid   => 0,
-        amount => 0.00,
-        memo   => "",
+        txid   => $options->{txid}   || 0,
+        amount => $options->{amount} || 0.00,
+        memo   => $options->{memo}   || "",
     };
 
     return bless $memo, 'Hush::Memo';