From 228c4bbdd2fc145b135de233632e8884d1d53cd7 Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Thu, 23 Aug 2012 12:41:52 -0600 Subject: [PATCH] Better use of default org-export-with-toc value * contrib/lisp/org-e-html.el (org-e-html-template): Default value of t for org-export-with-toc has no impact, so instead when t set TOC depth to 4. --- contrib/lisp/org-e-html.el | 1 + 1 file changed, 1 insertion(+) diff --git a/contrib/lisp/org-e-html.el b/contrib/lisp/org-e-html.el index 4e9d398..ee0f247 100644 --- a/contrib/lisp/org-e-html.el +++ b/contrib/lisp/org-e-html.el @@ -1473,6 +1473,7 @@ original parsed data. INFO is a plist holding export options."

%s

\n" (org-export-data (plist-get info :title) info)) ;; table of contents (let ((depth (plist-get info :with-toc))) + (when (eq t depth) (setq depth 4)) (when (wholenump depth) (org-e-html-toc depth info))) ;; document contents contents -- 1.7.12