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

[Miles Bader]

Index: emacs/lisp/url/url.el
diff -c emacs/lisp/url/url.el:1.3.2.5 emacs/lisp/url/url.el:1.3.2.6
*** emacs/lisp/url/url.el:1.3.2.5       Mon Oct 25 04:22:24 2004
--- emacs/lisp/url/url.el       Wed Dec  8 23:36:34 2004
***************
*** 207,213 ****
            (message "Viewing externally")
            (kill-buffer (current-buffer)))
        (display-buffer (current-buffer))
!       (mm-destroy-parts handle)))))
  
  (defun url-mm-url (url)
    "Retrieve URL and pass to the appropriate viewing application."
--- 207,216 ----
            (message "Viewing externally")
            (kill-buffer (current-buffer)))
        (display-buffer (current-buffer))
!       (add-hook 'kill-buffer-hook 
!                 `(lambda () (mm-destroy-parts ',handle))
!                 nil
!                 t)))))
  
  (defun url-mm-url (url)
    "Retrieve URL and pass to the appropriate viewing application."