mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-21 19:34:58 +00:00
Code

Stop linking to directories in sitemap.

Browse Source
This commit is contained in:
Carsten Dominik 2008-11-02 08:08:32 +01:00
parent 94c3bfd4e7
commit 33ea179f50
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lisp/ChangeLog
View File

@ -2,6 +2,7 @@
* org-publish.el (org-publish-org-index): Create a section in the
index file.
(org-publish-org-index): Stop linking to directories.
* org.el (org-emphasis-alist): Use span instead of <u> to
underline text.

3
lisp/org-publish.el
View File

@ -656,8 +656,7 @@ Default for INDEX-FILENAME is 'index.org'."
(pop subdirs))
(dolist (d subdirs)
(setq subdir (concat subdir d "/"))
(insert (concat indent-str " + [[file:"
subdir "][" d "/]]\n"))
(insert (concat indent-str " + " d "\n"))
(setq indent-str (make-string
(+ (length indent-str) 2) ?\ )))))))
;; This is common to 'flat and 'tree