[Emacs-diffs] Changes to emacs/lisp/url/url-http.el

[Juanma Barranquero]

Index: emacs/lisp/url/url-http.el
diff -c emacs/lisp/url/url-http.el:1.10 emacs/lisp/url/url-http.el:1.11
*** emacs/lisp/url/url-http.el:1.10     Mon Feb 14 09:58:33 2005
--- emacs/lisp/url/url-http.el  Mon May 16 10:07:31 2005
***************
*** 827,836 ****
                                                 'text-cursor
                                               'cursor)
                                       'invisible t))
!           (setq url-http-chunked-length (string-to-int (buffer-substring
!                                                         (match-beginning 1)
!                                                         (match-end 1))
!                                                        16)
                  url-http-chunked-counter (1+ url-http-chunked-counter)
                  url-http-chunked-start (set-marker
                                          (or url-http-chunked-start
--- 827,836 ----
                                                 'text-cursor
                                               'cursor)
                                       'invisible t))
!           (setq url-http-chunked-length (string-to-number (buffer-substring
!                                                              (match-beginning 
1)
!                                                              (match-end 1))
!                                                             16)
                  url-http-chunked-counter (1+ url-http-chunked-counter)
                  url-http-chunked-start (set-marker
                                          (or url-http-chunked-start
***************
*** 904,910 ****
                    url-http-content-type (mail-fetch-field "content-type"))
              (if (mail-fetch-field "content-length")
                  (setq url-http-content-length
!                       (string-to-int (mail-fetch-field "content-length"))))
              (widen)))
          (if url-http-transfer-encoding
              (setq url-http-transfer-encoding
--- 904,910 ----
                    url-http-content-type (mail-fetch-field "content-type"))
              (if (mail-fetch-field "content-length")
                  (setq url-http-content-length
!                       (string-to-number (mail-fetch-field "content-length"))))
              (widen)))
          (if url-http-transfer-encoding
              (setq url-http-transfer-encoding