From 54529104cd7a7b9205fc0c57182e5ee0413b5af7 Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Mon, 3 Nov 2014 01:51:35 +0000 Subject: Delete obsolete files. --- sample-question-unauthenticated.el | 42 -------------------------------------- 1 file changed, 42 deletions(-) delete mode 100644 sample-question-unauthenticated.el (limited to 'sample-question-unauthenticated.el') diff --git a/sample-question-unauthenticated.el b/sample-question-unauthenticated.el deleted file mode 100644 index 6adc9bb..0000000 --- a/sample-question-unauthenticated.el +++ /dev/null @@ -1,42 +0,0 @@ -(defvar sample-question-unauthenticated - (json-read-file "sample-question-unauthenticated.json")) -(defvar sample-frontpage - (json-read-file "sample-frontpage.json")) - -;;; A sample of data offered by the question object, without authentication. -;; (pp sample-question-unauthenticated (current-buffer)) - -(defun sample-question-markdown () - "Renders the question list usiong markdown for the content. -Doesn't seem like markdown gets fontified. Which is disapointing. :-(" - (interactive) - (find-file "sample.org") - (setf (buffer-string) - (org-element-interpret-data - (stack-lto--question sample-question-unauthenticated)))) - -(defun sample-frontpage-markdown () - "Renders the question list usiong markdown for the content. -Doesn't seem like markdown gets fontified. Which is disapointing. :-(" - (interactive) - (find-file "sample.org") - (erase-buffer) - (mapcar - (lambda (x) - (insert - (org-element-interpret-data - (stack-lto--question x)))) - (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