Fix returns for xml-rpc functions. This has been tested using a modified Frontier for perl.

This commit is contained in:
Miles Lott 2005-07-30 10:25:17 +00:00
parent 3435e4c38b
commit 58f462f6b7

View File

@ -103,7 +103,7 @@
return True; return True;
} }
function read($app,$prefix,$type='user') function read($app,$prefix='',$type='user')
{ {
switch($type) // set up some class vars to be used when processing the hooks switch($type) // set up some class vars to be used when processing the hooks
{ {
@ -130,6 +130,15 @@
echo 'Preferences array:' . "\n"; echo 'Preferences array:' . "\n";
_debug_array($this->prefs); _debug_array($this->prefs);
} }
/* Ensure that a struct will be returned via xml-rpc (this might change) */
if($this->xmlrpc)
{
return $this->prefs;
}
else
{
return False;
}
} }
function _write($appname,$prefix,$type='user') function _write($appname,$prefix,$type='user')
@ -196,7 +205,7 @@
$GLOBALS['egw']->preferences->save_repository(True,$type); $GLOBALS['egw']->preferences->save_repository(True,$type);
return False; return $this->prefs;
} }
function check_app() function check_app()