4 +-----------------------------------------------------------------------+
5 | program/steps/addressbook/mailto.inc |
7 | This file is part of the RoundCube Webmail client |
8 | Copyright (C) 2007, RoundCube Dev. - Switzerland |
9 | Licensed under the GNU GPL |
12 | Compose a recipient list with all selected contacts |
14 +-----------------------------------------------------------------------+
15 | Author: Thomas Bruederli <roundcube@gmail.com> |
16 +-----------------------------------------------------------------------+
18 $Id: copy.inc 471 2007-02-09 21:25:50Z thomasb $
22 $cid = get_input_value('_cid', RCUBE_INPUT_GET);
26 if ($cid && preg_match('/^[a-z0-9\-_=]+(,[a-z0-9\-_=]+)*$/i', $cid) && $CONTACTS->ready)
28 $CONTACTS->set_page(1);
29 $CONTACTS->set_pagesize(100);
30 $recipients = $CONTACTS->search($CONTACTS->primary_key, $cid);
32 while (is_object($recipients) && ($rec = $recipients->iterate()))
33 $mailto[] = format_email_recipient($rec['email'], $rec['name']);
38 $mailto_str = join(', ', $mailto);
39 $mailto_id = substr(md5($mailto_str), 0, 16);
40 $_SESSION['mailto'][$mailto_id] = $mailto_str;
41 $OUTPUT->command('redirect', rcmail_url('compose', array('_mailto' => $mailto_id), 'mail'));
44 $OUTPUT->show_message('nocontactsfound', 'warning');