/[notice-sender]/trunk/sender.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/sender.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 38 by dpavlin, Tue May 17 21:37:06 2005 UTC revision 45 by dpavlin, Wed May 18 13:12:54 2005 UTC
# Line 111  on that list. Line 111  on that list.
111    
112          foreach my $list (@lists) {          foreach my $list (@lists) {
113                  print $list->name," <",$list->email,">\n";                  print $list->name," <",$list->email,">\n";
114                  foreach my $user_on_list ($user_list->search(list_id => $list->id)) {                  foreach my $u ($nos->list_members( list => $list->name )) {
115                          my $user = $users->retrieve( id => $user_on_list->user_id );                          print "\t",$u->{'name'}, " <", $u->{'email'}, ">\n";
                         print "\t",$user->full_name," <", $user->email, ">\n";  
116                  }                  }
117          }          }
118    

Legend:
Removed from v.38  
changed lines
  Added in v.45

  ViewVC Help
Powered by ViewVC 1.1.26