42 |
|
|
43 |
Jifty->log->info( "found ", $mesg->count, " entries" ); |
Jifty->log->info( "found ", $mesg->count, " entries" ); |
44 |
|
|
45 |
foreach my $entry ( $mesg->entries ) { |
#foreach my $entry ( $mesg->entries ) { |
46 |
|
while ( my $entry = $mesg->shift_entry ) { |
47 |
|
|
48 |
# $entry->dump; |
# $entry->dump; |
49 |
|
|
63 |
|
|
64 |
Jifty->log->debug( dump( $data ) ); |
Jifty->log->debug( dump( $data ) ); |
65 |
|
|
66 |
my ( $id, $message ) = $user->load_or_create( %$data ); |
# my ( $id, $message ) = $user->load_or_create( %$data ); |
67 |
|
my ( $id, $message ) = $user->create( %$data ); |
68 |
|
|
69 |
if ( $id ) { |
if ( $id ) { |
70 |
Jifty->log->info("added $id ", $data->{uid}); |
Jifty->log->info("added $id ", $data->{uid}); |