improve comment

master
joey 2007-10-13 22:32:55 +00:00
parent 5b7edbf2a4
commit 27299788e8
1 changed files with 4 additions and 3 deletions

View File

@ -23,9 +23,10 @@ sub rpc_read {
while (<>) { while (<>) {
$accum.=$_; $accum.=$_;
# Kinda hackish approch to parse a single XML RPC out of the # Kinda hackish approach to parse a single XML RPC out of the
# accumulated input. Relies on calls always ending with a # accumulated input. Perl's RPC::XML library doesn't
# newline, which ikiwiki's protocol requires be true. # provide a better way to do it. Relies on calls always ending
# with a newline, which ikiwiki's protocol requires be true.
if ($accum =~ /^\s*(<\?xml\s.*?<\/(?:methodCall|methodResponse)>)\n(.*)/s) { if ($accum =~ /^\s*(<\?xml\s.*?<\/(?:methodCall|methodResponse)>)\n(.*)/s) {
$accum=$2; # the rest $accum=$2; # the rest