bug fix: avoid infinite loop of xml-parse-region

* twittering-mode.el (twittering-get-response-body): bug fix: goto the
beginning of buffer before search-forward. 'xml-parse-region' doesn't
return when parsing unbalanced XML.

ChangeLog

@@ -2,6 +2,9 @@
 
 	* twittering-mode.el (twittering-start-http-session): check if
 	curl can use https or not.
+	(twittering-get-response-body): bug fix: goto the beginning of
+	buffer before search-forward. 'xml-parse-region' doesn't return
+	when parsing unbalanced XML.
 
 2009-12-29  Satoshi Yatagawa  <yata_github@y.hauN.org>
 

twittering-mode.el

@@ -1143,6 +1143,7 @@ XML tree as list. Return nil when parse failed.
   (if (stringp buffer) (setq buffer (get-buffer buffer)))
   (save-excursion
     (set-buffer buffer)
+    (goto-char (point-min))
     (let ((start (if (search-forward-regexp "\r?\n\r?\n" nil t)
 		     (match-end 0)
 		   (point))))