The two adjacent 'save-excursion' forms are integrated.

hayamiz · Dec 27, 2009 · f9b7583 · f9b7583
1 parent bafec64
commit f9b7583
Showing 1 changed file with 1 addition and 4 deletions.
diff --git a/twittering-mode.el b/twittering-mode.el
@@ -1160,10 +1160,7 @@ PARAMETERS is alist of URI parameters.
     (goto-char (point-min))
     (when (search-forward-regexp
 	   "HTTP/1\\.[01] 200 Connection established\r\n\r\n" nil t)
-      (delete-region (point-min) (point))))
-
-  (save-excursion
-    (set-buffer buffer)
+      (delete-region (point-min) (point)))
     (let* ((start (point))
 	   (end (if (search-forward-regexp "\r?\n\r?\n")
 		    (match-end 0)