Index: program/steps/addressbook/func.inc
===================================================================
--- program/steps/addressbook/func.inc	(revision 5731d68a9709b5aab47ea3004a43df7b9e43f98c)
+++ program/steps/addressbook/func.inc	(revision 34854b63ee18d7b1a8b95d138460504e5d1c3f67)
@@ -151,8 +151,8 @@
 
     // get list of address sources
-    $list = $RCMAIL->get_address_sources($writable);
+    $first = reset($RCMAIL->get_address_sources($writable));
 
     // use first directory by default
-    return $list[key($list)]['id'];
+    return $first['id'];
 }