X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2FXMLRPC.pm;fp=FS%2FFS%2FXMLRPC.pm;h=d7ba75a233dcf1edf5ffc9b5a689430dd9211f96;hb=a18e0aadb62be9f96c0aa42b3a6464dc933477dc;hp=287a502c59c09a5bb3abf5a120296a0958049ca9;hpb=68c43e49c834314e64b8c6929ba231feca151e7e;p=freeside.git diff --git a/FS/FS/XMLRPC.pm b/FS/FS/XMLRPC.pm index 287a502c5..d7ba75a23 100644 --- a/FS/FS/XMLRPC.pm +++ b/FS/FS/XMLRPC.pm @@ -118,9 +118,12 @@ sub _serve { #Subroutine, not method warn Dumper(@result); if (grep { UNIVERSAL::can($_, 'hashref') ? 0 : 1 } @result) { - warn "FS::XMLRPC: One or more objects returned from '${fssub}' doesn't " . - "support the 'hashref' method."; - return []; + #warn "FS::XMLRPC: One or more objects returned from '${fssub}' doesn't " . + # "support the 'hashref' method."; + + # If they're not FS::Record decendants, just return the results unmap'd? + # This is more flexible, but possibly more error-prone. + return [ @result ]; } else { return [ map { $_->hashref } @result ]; }