* lisp/doc-view.el (doc-view-current-cache-dir): Beware % escapes.

Fixes: debbugs:13679
This commit is contained in:
Elias Pipping 2013-02-11 14:29:40 -05:00 committed by Stefan Monnier
parent 99d0d6dc23
commit 4fa60c545d
2 changed files with 7 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2013-02-11 Elias Pipping <pipping@lavabit.com>
* doc-view.el (doc-view-current-cache-dir): Beware % escapes
(bug#13679).
2013-02-11 Stefan Monnier <monnier@iro.umontreal.ca>
* cus-start.el (all): Remove inhibit-local-menu-bar-menus.

View file

@ -686,7 +686,8 @@ It's a subdirectory of `doc-view-cache-directory'."
(setq doc-view-current-cache-dir
(file-name-as-directory
(expand-file-name
(concat (file-name-nondirectory doc-view-buffer-file-name)
(concat (subst-char-in-string ?% ?_ ;; bug#13679
(file-name-nondirectory doc-view-buffer-file-name))
"-"
(let ((file doc-view-buffer-file-name))
(with-temp-buffer