diff options
| author | Bill Wohler | 2006-11-14 06:30:50 +0000 |
|---|---|---|
| committer | Bill Wohler | 2006-11-14 06:30:50 +0000 |
| commit | ff4dd1991d5f4cb0ffc0bf52e87072a5c01c98f8 (patch) | |
| tree | 226416c8bb9b032a2dc5b0ec864b8a3b322f9290 | |
| parent | 1b5929b9895e90b16205591f5cb573328c911a5d (diff) | |
| download | emacs-ff4dd1991d5f4cb0ffc0bf52e87072a5c01c98f8.tar.gz emacs-ff4dd1991d5f4cb0ffc0bf52e87072a5c01c98f8.zip | |
(mh-x-image-url-cache-canonicalize): Add `*' to reserved Windows
filename characters (closes SF #1396499).
| -rw-r--r-- | lisp/mh-e/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/mh-e/mh-xface.el | 16 |
2 files changed, 14 insertions, 7 deletions
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index 594fb2e6933..1aea0bed52e 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2006-11-14 Bill Wohler <wohler@newt.com> | ||
| 2 | |||
| 3 | * mh-xface.el (mh-x-image-url-cache-canonicalize): Add `*' to | ||
| 4 | reserved Windows filename characters (closes SF #1396499). | ||
| 5 | |||
| 1 | 2006-11-13 Bill Wohler <wohler@newt.com> | 6 | 2006-11-13 Bill Wohler <wohler@newt.com> |
| 2 | 7 | ||
| 3 | Release MH-E version 8.0.3. | 8 | Release MH-E version 8.0.3. |
diff --git a/lisp/mh-e/mh-xface.el b/lisp/mh-e/mh-xface.el index deb2cebad14..e6da73339c1 100644 --- a/lisp/mh-e/mh-xface.el +++ b/lisp/mh-e/mh-xface.el | |||
| @@ -361,14 +361,16 @@ This is only done if `mh-x-image-cache-directory' is nil." | |||
| 361 | Replace the ?/ character with a ?! character and append .png. | 361 | Replace the ?/ character with a ?! character and append .png. |
| 362 | Also replaces special characters with `mh-url-hexify-string' | 362 | Also replaces special characters with `mh-url-hexify-string' |
| 363 | since not all characters, such as :, are legal within Windows | 363 | since not all characters, such as :, are legal within Windows |
| 364 | filenames. See URL | 364 | filenames. In addition, replaces * with %2a. See URL |
| 365 | `http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fileio/fs/naming_a_file.asp'." | 365 | `http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/ifaces/iitemnamelimits/GetValidCharacters.asp'." |
| 366 | (format "%s/%s.png" mh-x-image-cache-directory | 366 | (format "%s/%s.png" mh-x-image-cache-directory |
| 367 | (mh-url-hexify-string | 367 | (mh-replace-regexp-in-string |
| 368 | (with-temp-buffer | 368 | "\*" "%2a" |
| 369 | (insert url) | 369 | (mh-url-hexify-string |
| 370 | (mh-replace-string "/" "!") | 370 | (with-temp-buffer |
| 371 | (buffer-string))))) | 371 | (insert url) |
| 372 | (mh-replace-string "/" "!") | ||
| 373 | (buffer-string)))))) | ||
| 372 | 374 | ||
| 373 | (defun mh-x-image-get-download-state (file) | 375 | (defun mh-x-image-get-download-state (file) |
| 374 | "Check the state of FILE by following any symbolic links." | 376 | "Check the state of FILE by following any symbolic links." |