Skip to content

Commit

Permalink
(twittering-get-response-*): delete an adjusting code bacause 'with-c…
Browse files Browse the repository at this point in the history
…urrent-buffer' that can accept both a buffer and a buffer name.
  • Loading branch information
yata committed Jan 16, 2010
1 parent 91b8aeb commit 5239340
Show file tree
Hide file tree
Showing 2 changed files with 7 additions and 5 deletions.
7 changes: 7 additions & 0 deletions ChangeLog
@@ -1,3 +1,10 @@
2010-01-16 Satoshi Yatagawa <yata_github@y.hauN.org>

* twittering-mode.el (twittering-get-response-header): Delete an
adjusting code bacause `with-current-buffer' that can accept both
a buffer and a buffer name.
(twittering-get-response-body): Likewise.

2010-01-16 Tadashi MATSUO <tad@mymail.twin.jp>

* twittering-mode.el (twittering-format-status): fix incorrect
Expand Down
5 changes: 0 additions & 5 deletions twittering-mode.el
Expand Up @@ -1524,9 +1524,6 @@ PARAMETERS is alist of URI parameters.
(defun twittering-get-response-header (buffer)
"Exract HTTP response header from HTTP response.
`buffer' may be a buffer or the name of an existing buffer which contains the HTTP response."
(if (stringp buffer)
(setq buffer (get-buffer buffer)))

;; FIXME:
;; curl prints HTTP proxy response header, so strip it
(with-current-buffer buffer
Expand All @@ -1543,8 +1540,6 @@ PARAMETERS is alist of URI parameters.
"Exract HTTP response body from HTTP response, parse it as XML, and return a
XML tree as list. Return nil when parse failed.
`buffer' may be a buffer or the name of an existing buffer. "
(if (stringp buffer)
(setq buffer (get-buffer buffer)))
(with-current-buffer buffer
(save-excursion
(goto-char (point-min))
Expand Down

0 comments on commit 5239340

Please sign in to comment.