Create proper file target for index entries in subdirectories.

* org-publish.el (org-publish-index-generate-theindex): Create
proper file target for index entries in subdirectories.
This commit is contained in:
Bastien Guerry 2011-12-17 15:07:13 +01:00
parent 8fb0f3d73e
commit 82b691df1f

View file

@ -984,7 +984,9 @@ the project."
main last-main letter last-letter file sub link tgext)
;; `files' contains the list of relative file names
(dolist (file files)
(setq origfile (substring file 1 -1))
(setq origfile
(concat (file-name-directory file)
(substring (file-name-nondirectory file) 1 -1)))
(setq buf (find-file-noselect file))
(with-current-buffer buf
(goto-char (point-min))