From c260bacd501a99bd68c6db5354b536867af1c012 Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Sat, 1 Nov 2014 15:48:30 +0000 Subject: Implement an example with the html renderer --- sample-question-unauthenticated.el | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) (limited to 'sample-question-unauthenticated.el') diff --git a/sample-question-unauthenticated.el b/sample-question-unauthenticated.el index b448b73..6adc9bb 100644 --- a/sample-question-unauthenticated.el +++ b/sample-question-unauthenticated.el @@ -26,8 +26,16 @@ Doesn't seem like markdown gets fontified. Which is disapointing. :-(" (insert (org-element-interpret-data (stack-lto--question x)))) - (cdr (assoc 'items sample-frontpage))) - (org-global-cycle 1)) + (nthcdr 25 (mapcar #'identity (cdr (assoc 'items sample-frontpage))))) + (org-global-cycle 1) + (stack-navigation-mode)) + +(defun sample-frontpage-html () + "Renders the question list usiong markdown for the content. +Doesn't seem like markdown gets fontified. Which is disapointing. :-(" + (interactive) + (let ((stack-lto-body-src-block nil)) + (sample-frontpage-markdown))) (provide 'sample-question-unauthenticated) -- cgit v1.2.3