+function list_writable_backends($name) {
+ global $color, $abook;
+ if ( $name != 'addaddr' ) { return; }
+ if ( $abook->numbackends > 1 ) {
+ $ret = "<select name=backend>";
+ $backends = $abook->get_backend_list();
+ while (list($undef,$v) = each($backends)) {
+ if ($v->writeable) {
+ $ret .= '<OPTION VALUE=' . $v->bnum;
+ $ret .= '>' . $v->sname . "\n";
+ }
+ }
+ $ret .= "</select>";
+ return html_tag( 'tr',
+ html_tag( 'td', _("Add to:"),'right', $color[4] ) .
+ html_tag( 'td', $ret, 'left', $color[4] )) . "\n";
+ } else {
+ return html_tag( 'tr',
+ html_tag( 'td',
+ '<input type=hidden name=backend value=1>',
+ 'center', $color[4], 'colspan="2"')) . "\n";
+ }
+}
+