[Emacsweblogs] Re: Error

[John SJ Anderson]

> I couldn't sleep — your problem was keeping me up.
>
> If you haven't guessed yet, it is a simple typo:

Thanks for the rapid response -- unfortunately, now I get a different  
error:

Debugger entered--Lisp error: (error "XML-RPC fault `Application  
failed during request deserialization: wrong element 'dateTime'
'")
  signal(error ("XML-RPC fault `Application failed during request  
deserialization: wrong element 'dateTime'\n'"))
  error("XML-RPC fault `%s'" "Application failed during request  
deserialization: wrong element 'dateTime'\n")
  (let ((resp ...)) (setq xml-rpc-fault-string (nth 2 resp)) (setq  
xml-rpc-fault-code (nth 1 resp)) (error "XML-RPC fault `%s'" xml-rpc- 
fault-string))
  (cond ((not ...) (error "No methodResponse found")) ((xml-rpc- 
response-errorp xml) (let ... ... ... ...)) (t (let ... ...)))
  xml-rpc-xml-to-response(((methodResponse nil (fault nil ...))))
  (cond ((stringp response) (list ...)) (t (xml-rpc-xml-to-response  
response)))
  (let ((response ...)) (cond (... ...) (t ...)))
  xml-rpc-method-call("http://SITE/mt/mt-xmlrpc.cgi"; metaWeblog 
\.newPost "1" "USER" "PASS" (("title" . "this is a test")  
("authorName" . "genehack") ("dateCreated" :datetime (14445 17280))  
("description" . "testing weblogger.el...")) nil)
  weblogger-api-meta-new-entry((("authorName" . "genehack")  
("dateCreated" :datetime (14445 17280)) ("texttype") ("url")  
("title" . "this is a test") ("tags") ("entry-id") ("content" .  
"testing weblogger.el...")) nil)
  funcall(weblogger-api-meta-new-entry (("authorName" . "genehack")  
("dateCreated" :datetime (14445 17280)) ("texttype") ("url")  
("title" . "this is a test") ("tags") ("entry-id") ("content" .  
"testing weblogger.el...")) nil)
  (cons "entry-id" (funcall weblogger-api-new-entry struct publishp))
  (add-to-list (quote struct) (cons "entry-id" (funcall weblogger-api- 
new-entry struct publishp)))
  (ring-insert weblogger-entry-ring (add-to-list (quote struct) (cons  
"entry-id" ...)))
  weblogger-api-new-entry((("authorName" . "genehack")  
("dateCreated" :datetime (14445 17280)) ("texttype") ("url")  
("title" . "this is a test") ("tags") ("entry-id") ("content" .  
"testing weblogger.el...")) nil)
  (weblogger-entry-setup-headers (weblogger-api-new-entry entry  
publishp))
  (cond ((cdr ...) (weblogger-update-ring entry) (weblogger-api-send- 
edits entry publishp) (set-buffer-modified-p nil)) (t (weblogger-entry- 
setup-headers ...)))
  (cond ((and ... ...) (weblogger-server-username arg) (weblogger- 
server-password arg) (weblogger-weblog-id arg) (cond ... ...)) (t  
(message "Nothing to post.")))
  (let ((entry ...)) (cond (... ... ... ... ...) (t ...)))
  (if (not (equal ... *weblogger-entry*)) (message "You are not in  
the *weblogger-entry* buffer.") (let (...) (cond ... ...)))
  weblogger-save-entry(nil nil)
  weblogger-send-entry()
  call-interactively(weblogger-send-entry nil nil)




> === modified file 'lisp/xml-rpc.el'
> --- lisp/xml-rpc.el     2009-09-10 01:22:31 +0000
> +++ lisp/xml-rpc.el     2009-09-10 03:38:50 +0000
> @@ -357,7 +357,7 @@
>                                             (cdar value)))))
>                     result (append result xmlval)
>                     value (cdr value)))
> -       `((evalue nil ,(append '(struct nil) result)))))
> +       `((value nil ,(append '(struct nil) result)))))
>    ;; Value is a scalar
>    ((xml-rpc-value-intp value)
>     `((value nil (int nil ,(int-to-string value)))))
>
>
> No, I was't playing guessing games with you: I realized this after I
> went to bed.  ;)
>
> Mark.
>
>
> --
> http://hexmode.com/
>
> Every day, mindful practice.  When the mind is disciplined, then the
> Way can work for us.  Otherwise, all we do is talk of the Way;  
> everything
> is just words; and the world will know us as its one great fool.