# HG changeset patch # User Reiner Steib # Date 1130246332 0 # Node ID 71a815b63b2b08f7ddcbf2442096f5af607c2885 # Parent 5a1898d736d03c792efca7a32f51b381abef173a (browse-url-of-buffer): Add ".html" to filename. diff -r 5a1898d736d0 -r 71a815b63b2b lisp/ChangeLog --- a/lisp/ChangeLog Tue Oct 25 12:02:47 2005 +0000 +++ b/lisp/ChangeLog Tue Oct 25 13:18:52 2005 +0000 @@ -1,3 +1,8 @@ +2005-10-25 Reiner Steib + + * net/browse-url.el (browse-url-of-buffer): Add ".html" to + filename. + 2005-10-25 Masatake YAMATO * dired-x.el (dired-virtual): Don't use `dired-insert-headerline'. diff -r 5a1898d736d0 -r 71a815b63b2b lisp/net/browse-url.el --- a/lisp/net/browse-url.el Tue Oct 25 12:02:47 2005 +0000 +++ b/lisp/net/browse-url.el Tue Oct 25 13:18:52 2005 +0000 @@ -713,7 +713,8 @@ (setq browse-url-temp-file-name (convert-standard-filename (make-temp-file - (expand-file-name "burl" browse-url-temp-dir))))) + (expand-file-name "burl" browse-url-temp-dir) + nil ".html")))) (setq file-name browse-url-temp-file-name) (write-region (point-min) (point-max) file-name nil 'no-message))) (browse-url-of-file file-name))))