Mercurial > emacs
changeset 68131:b9b10fe7c97a
(mh-x-image-url-cache-canonicalize): Use url-hexify-string to remove
special characters from filenames (closes SF #1396499).
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Wed, 11 Jan 2006 08:58:02 +0000 |
parents | dfa5a760e24f |
children | 91ac87e90cb5 |
files | lisp/mh-e/ChangeLog lisp/mh-e/mh-utils.el |
diffstat | 2 files changed, 15 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mh-e/ChangeLog Wed Jan 11 07:46:57 2006 +0000 +++ b/lisp/mh-e/ChangeLog Wed Jan 11 08:58:02 2006 +0000 @@ -1,7 +1,14 @@ +2006-01-11 Bill Wohler <wohler@newt.com> + + * mh-utils.el (mh-x-image-url-cache-canonicalize): Use + url-hexify-string to remove special characters from filenames + (closes SF #1396499). + 2006-01-10 Bill Wohler <wohler@newt.com> * mh-comp.el (mh-insert-letter): If you choose a different folder, - the cur message is used (closes SF #1205890). + the cur message is used. Sync docstring with manual (closes SF + #1205890). * mh-mime.el (mh-compose-forward): Use standard range argument instead of messages. Use more powerful mh-read-range instead of
--- a/lisp/mh-e/mh-utils.el Wed Jan 11 07:46:57 2006 +0000 +++ b/lisp/mh-e/mh-utils.el Wed Jan 11 08:58:02 2006 +0000 @@ -1489,12 +1489,16 @@ (defun mh-x-image-url-cache-canonicalize (url) "Canonicalize URL. -Replace the ?/ character with a ?! character and append .png." - (format "%s/%s.png" mh-x-image-cache-directory +Replace the ?/ character with a ?! character and append .png. +Also replaces special characters with `url-hexify-string' since +not all characters, such as :, are legal within Windows +filenames. See URL `http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fileio/fs/naming_a_file.asp'." + (format "%s/%s.png" mh-x-image-cache-directory + (url-hexify-string (with-temp-buffer (insert url) (mh-replace-string "/" "!") - (buffer-string)))) + (buffer-string))))) (defun mh-x-image-set-download-state (file data) "Setup a symbolic link from FILE to DATA."