diff options
| author | Joakim Verona | 2013-08-14 15:04:45 +0200 |
|---|---|---|
| committer | Joakim Verona | 2013-08-14 15:04:45 +0200 |
| commit | d84cbc292773e6f3178b276c34f52b22220a2163 (patch) | |
| tree | d8698d5419dc821d0aa40469b2657ea5610caf87 | |
| parent | 0c405d30ab1e3464cf3e03547db939fad0a765d0 (diff) | |
| parent | 6c195442ea35de9b22cb5c1f4884f05b5ae92222 (diff) | |
| download | emacs-d84cbc292773e6f3178b276c34f52b22220a2163.tar.gz emacs-d84cbc292773e6f3178b276c34f52b22220a2163.zip | |
merge from trunk
| -rw-r--r-- | lisp/url/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/url/url-http.el | 1 | ||||
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/decompress.c | 12 |
4 files changed, 17 insertions, 5 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 2346803c6bf..52a69690534 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-08-14 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 2 | |||
| 3 | * url-http.el (url-http-parse-headers): Always place point at the | ||
| 4 | start of the buffer instead of just 80% of the time. | ||
| 5 | |||
| 1 | 2013-08-12 Lars Magne Ingebrigtsen <larsi@gnus.org> | 6 | 2013-08-12 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 7 | ||
| 3 | * url-http.el (url-handle-content-transfer-encoding): Renamed | 8 | * url-http.el (url-handle-content-transfer-encoding): Renamed |
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 07049591cf0..7047e6b5f13 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el | |||
| @@ -855,6 +855,7 @@ should be shown to the user." | |||
| 855 | (url-handle-content-transfer-encoding)) | 855 | (url-handle-content-transfer-encoding)) |
| 856 | (url-http-debug "Finished parsing HTTP headers: %S" success) | 856 | (url-http-debug "Finished parsing HTTP headers: %S" success) |
| 857 | (widen) | 857 | (widen) |
| 858 | (goto-char (point-min)) | ||
| 858 | success)) | 859 | success)) |
| 859 | 860 | ||
| 860 | (defun url-handle-content-transfer-encoding () | 861 | (defun url-handle-content-transfer-encoding () |
diff --git a/src/ChangeLog b/src/ChangeLog index c8a1de49d68..eeae85a888c 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2013-08-14 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 2 | |||
| 3 | * decompress.c (unwind_decompress): Always restore point. | ||
| 4 | |||
| 1 | 2013-08-14 Paul Eggert <eggert@cs.ucla.edu> | 5 | 2013-08-14 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 6 | ||
| 3 | * xdisp.c (cursor_type_changed): Now static. | 7 | * xdisp.c (cursor_type_changed): Now static. |
diff --git a/src/decompress.c b/src/decompress.c index c54a34e050e..b4e122c3ba8 100644 --- a/src/decompress.c +++ b/src/decompress.c | |||
| @@ -95,12 +95,14 @@ unwind_decompress (void *ddata) | |||
| 95 | struct decompress_unwind_data *data = ddata; | 95 | struct decompress_unwind_data *data = ddata; |
| 96 | fn_inflateEnd (data->stream); | 96 | fn_inflateEnd (data->stream); |
| 97 | 97 | ||
| 98 | /* Delete any uncompressed data already inserted and restore point. */ | 98 | /* Delete any uncompressed data already inserted on error. */ |
| 99 | if (data->start) | 99 | if (data->start) |
| 100 | { | 100 | del_range (data->start, PT); |
| 101 | del_range (data->start, PT); | 101 | |
| 102 | SET_PT (data->old_point); | 102 | /* Put point where it was, or if the buffer has shrunk because the |
| 103 | } | 103 | compressed data is bigger than the uncompressed, at |
| 104 | point-max. */ | ||
| 105 | SET_PT (min (data->old_point, ZV)); | ||
| 104 | } | 106 | } |
| 105 | 107 | ||
| 106 | DEFUN ("zlib-available-p", Fzlib_available_p, Szlib_available_p, 0, 0, 0, | 108 | DEFUN ("zlib-available-p", Fzlib_available_p, Szlib_available_p, 0, 0, 0, |