From mboxrd@z Thu Jan 1 00:00:00 1970 From: Shlomi Vaknin Subject: Subject: Bug: Exception when trying to export inlined-code [8.3.4 (8.3.4-9-gfda14f-elpa @ /Users/vaknins9/.emacs.d/elpa/org-20160307/)] Date: Wed, 09 Mar 2016 01:38:34 +0000 Message-ID: Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=001a113a7e7c277203052d93c26e Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:53482) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1adT5S-0003ao-4L for emacs-orgmode@gnu.org; Tue, 08 Mar 2016 20:39:02 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1adT5J-0000P9-Jh for emacs-orgmode@gnu.org; Tue, 08 Mar 2016 20:38:54 -0500 Received: from mail-qg0-x233.google.com ([2607:f8b0:400d:c04::233]:35395) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1adT5J-0000Oh-7E for emacs-orgmode@gnu.org; Tue, 08 Mar 2016 20:38:45 -0500 Received: by mail-qg0-x233.google.com with SMTP id y89so29454024qge.2 for ; Tue, 08 Mar 2016 17:38:44 -0800 (PST) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --001a113a7e7c277203052d93c26e Content-Type: text/plain; charset=UTF-8 Hey, I am a heavy org-mode user, and I absolutely love it! One of my org-files stopped being exportable at some point. I managed to trace it to something to do with inline source blocks (of course it might not be the root cause..) I am getting an exception (Wrong type argument: integer-or-marker-p,nil) when trying to export an org file with inlined code. Here is the smallest org file I could came up with that produces this error: ----- * Test a - src_elisp{3} * Test Q - src_elisp{3} - test - something - src_elisp{3} - src_elisp{3} {{{results(=3=)}}} - src_elisp{3} {{{results(=3=)}}} ----- If I remove any of the last {{{result...}}} sections the error goes away. Could this be related to the new inline result format? Here is a backtrace: Debugger entered--Lisp error: (wrong-type-argument integer-or-marker-p nil) goto-char(nil) (progn (goto-char contents-end) (skip-chars-forward " \n" limit) (if (= (point) limit) limit (line-beginning-position))) (let* ((struct (or structure (org-element--list-struct limit))) (type (cond ((org-looking-at-p "[ ]*[A-Za-z0-9]") (quote ordered)) ((nth 5 (assq (point) struct)) (quote descriptive)) (t (quote unordered)))) (contents-begin (point)) (begin (car affiliated)) (contents-end (let* ((item (assq contents-begin struct)) (ind (nth 1 item)) (pos (nth 6 item))) (while (and (setq item (assq pos struct)) (= (nth 1 item) ind)) (setq pos (nth 6 item))) pos)) (end (progn (goto-char contents-end) (skip-chars-forward " \n" limit) (if (= (point) limit) limit (line-beginning-position))))) (list (quote plain-list) (nconc (list :type type :begin begin :end end :contents-begin contents-begin :contents-end contents-end :structure struct :post-blank (count-lines contents-end end) :post-affiliated contents-begin) (cdr affiliated)))) (save-excursion (let* ((struct (or structure (org-element--list-struct limit))) (type (cond ((org-looking-at-p "[ ]*[A-Za-z0-9]") (quote ordered)) ((nth 5 (assq ... struct)) (quote descriptive)) (t (quote unordered)))) (contents-begin (point)) (begin (car affiliated)) (contents-end (let* ((item (assq contents-begin struct)) (ind (nth 1 item)) (pos (nth 6 item))) (while (and (setq item ...) (= ... ind)) (setq pos (nth 6 item))) pos)) (end (progn (goto-char contents-end) (skip-chars-forward " \n" limit) (if (= (point) limit) limit (line-beginning-position))))) (list (quote plain-list) (nconc (list :type type :begin begin :end end :contents-begin contents-begin :contents-end contents-end :structure struct :post-blank (count-lines contents-end end) :post-affiliated contents-begin) (cdr affiliated))))) org-element-plain-list-parser(98 (60) ((25 2 "- " nil nil nil 30) (30 2 "- " nil nil nil 39) (39 2 "- " nil nil nil 110) (53 4 "- " nil nil nil 72) (72 4 "- " nil nil nil 110))) (cond ((and (cdr affiliated) (>= (point) limit)) (goto-char (car affiliated)) (org-element-keyword-parser limit nil)) ((looking-at org-element--latex-begin-environment) (org-element-latex-environment-parser limit affiliated)) ((looking-at org-drawer-regexp) (org-element-drawer-parser limit affiliated)) ((looking-at "[ ]*:\\( \\|$\\)") (org-element-fixed-width-parser limit affiliated)) ((looking-at "[ ]*#") (goto-char (match-end 0)) (cond ((looking-at "\\(?: \\|$\\)") (beginning-of-line) (org-element-comment-parser limit affiliated)) ((looking-at "\\+BEGIN_\\(\\S-+\\)") (beginning-of-line) (let ((parser (assoc ... org-element-block-name-alist))) (if parser (funcall (cdr parser) limit affiliated) (org-element-special-block-parser limit affiliated)))) ((looking-at "\\+CALL:") (beginning-of-line) (org-element-babel-call-parser limit affiliated)) ((looking-at "\\+BEGIN:? ") (beginning-of-line) (org-element-dynamic-block-parser limit affiliated)) ((looking-at "\\+\\S-+:") (beginning-of-line) (org-element-keyword-parser limit affiliated)) (t (beginning-of-line) (org-element-paragraph-parser limit affiliated)))) ((looking-at org-footnote-definition-re) (org-element-footnote-definition-parser limit affiliated)) ((looking-at "[ ]*-\\{5,\\}[ ]*$") (org-element-horizontal-rule-parser limit affiliated)) ((looking-at "%%(") (org-element-diary-sexp-parser limit affiliated)) ((looking-at "[ ]*\\(|\\|\\+\\(-+\\+\\)+[ ]*$\\)") (org-element-table-parser limit affiliated)) ((looking-at (org-item-re)) (org-element-plain-list-parser limit affiliated (or structure (org-element--list-struct limit)))) (t (org-element-paragraph-parser limit affiliated))) (let ((affiliated (org-element--collect-affiliated-keywords limit))) (cond ((and (cdr affiliated) (>= (point) limit)) (goto-char (car affiliated)) (org-element-keyword-parser limit nil)) ((looking-at org-element--latex-begin-environment) (org-element-latex-environment-parser limit affiliated)) ((looking-at org-drawer-regexp) (org-element-drawer-parser limit affiliated)) ((looking-at "[ ]*:\\( \\|$\\)") (org-element-fixed-width-parser limit affiliated)) ((looking-at "[ ]*#") (goto-char (match-end 0)) (cond ((looking-at "\\(?: \\|$\\)") (beginning-of-line) (org-element-comment-parser limit affiliated)) ((looking-at "\\+BEGIN_\\(\\S-+\\)") (beginning-of-line) (let ((parser ...)) (if parser (funcall ... limit affiliated) (org-element-special-block-parser limit affiliated)))) ((looking-at "\\+CALL:") (beginning-of-line) (org-element-babel-call-parser limit affiliated)) ((looking-at "\\+BEGIN:? ") (beginning-of-line) (org-element-dynamic-block-parser limit affiliated)) ((looking-at "\\+\\S-+:") (beginning-of-line) (org-element-keyword-parser limit affiliated)) (t (beginning-of-line) (org-element-paragraph-parser limit affiliated)))) ((looking-at org-footnote-definition-re) (org-element-footnote-definition-parser limit affiliated)) ((looking-at "[ ]*-\\{5,\\}[ ]*$") (org-element-horizontal-rule-parser limit affiliated)) ((looking-at "%%(") (org-element-diary-sexp-parser limit affiliated)) ((looking-at "[ ]*\\(|\\|\\+\\(-+\\+\\)+[ ]*$\\)") (org-element-table-parser limit affiliated)) ((looking-at (org-item-re)) (org-element-plain-list-parser limit affiliated (or structure (org-element--list-struct limit)))) (t (org-element-paragraph-parser limit affiliated)))) (cond ((eq mode (quote item)) (org-element-item-parser limit structure raw-secondary-p)) ((eq mode (quote table-row)) (org-element-table-row-parser limit)) ((eq mode (quote node-property)) (org-element-node-property-parser limit)) ((progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp (org-get-limited-outline-regexp)) (outline-regexp org-outline-regexp) (org-outline-regexp-bol (concat "^" org-outline-regexp))) (org-at-heading-p))) (org-element-headline-parser limit raw-secondary-p)) ((eq mode (quote section)) (org-element-section-parser limit)) ((eq mode (quote first-section)) (org-element-section-parser (or (save-excursion (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) (outline-next-heading)))) limit))) ((and (eq mode (quote planning)) (looking-at org-planning-line-re)) (org-element-planning-parser limit)) ((and (memq mode (quote (planning property-drawer))) (looking-at org-property-drawer-re)) (org-element-property-drawer-parser limit)) ((not (bolp)) (org-element-paragraph-parser limit (list (point)))) ((looking-at org-clock-line-re) (org-element-clock-parser limit)) ((org-at-heading-p) (org-element-inlinetask-parser limit raw-secondary-p)) (t (let ((affiliated (org-element--collect-affiliated-keywords limit))) (cond ((and (cdr affiliated) (>= (point) limit)) (goto-char (car affiliated)) (org-element-keyword-parser limit nil)) ((looking-at org-element--latex-begin-environment) (org-element-latex-environment-parser limit affiliated)) ((looking-at org-drawer-regexp) (org-element-drawer-parser limit affiliated)) ((looking-at "[ ]*:\\( \\|$\\)") (org-element-fixed-width-parser limit affiliated)) ((looking-at "[ ]*#") (goto-char (match-end 0)) (cond ((looking-at "\\(?: \\|$\\)") (beginning-of-line) (org-element-comment-parser limit affiliated)) ((looking-at "\\+BEGIN_\\(\\S-+\\)") (beginning-of-line) (let ... ...)) ((looking-at "\\+CALL:") (beginning-of-line) (org-element-babel-call-parser limit affiliated)) ((looking-at "\\+BEGIN:? ") (beginning-of-line) (org-element-dynamic-block-parser limit affiliated)) ((looking-at "\\+\\S-+:") (beginning-of-line) (org-element-keyword-parser limit affiliated)) (t (beginning-of-line) (org-element-paragraph-parser limit affiliated)))) ((looking-at org-footnote-definition-re) (org-element-footnote-definition-parser limit affiliated)) ((looking-at "[ ]*-\\{5,\\}[ ]*$") (org-element-horizontal-rule-parser limit affiliated)) ((looking-at "%%(") (org-element-diary-sexp-parser limit affiliated)) ((looking-at "[ ]*\\(|\\|\\+\\(-+\\+\\)+[ ]*$\\)") (org-element-table-parser limit affiliated)) ((looking-at (org-item-re)) (org-element-plain-list-parser limit affiliated (or structure (org-element--list-struct limit)))) (t (org-element-paragraph-parser limit affiliated)))))) (let ((case-fold-search t) (raw-secondary-p (and granularity (not (eq granularity (quote object)))))) (cond ((eq mode (quote item)) (org-element-item-parser limit structure raw-secondary-p)) ((eq mode (quote table-row)) (org-element-table-row-parser limit)) ((eq mode (quote node-property)) (org-element-node-property-parser limit)) ((progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp (org-get-limited-outline-regexp)) (outline-regexp org-outline-regexp) (org-outline-regexp-bol (concat "^" org-outline-regexp))) (org-at-heading-p))) (org-element-headline-parser limit raw-secondary-p)) ((eq mode (quote section)) (org-element-section-parser limit)) ((eq mode (quote first-section)) (org-element-section-parser (or (save-excursion (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ... ...))) limit))) ((and (eq mode (quote planning)) (looking-at org-planning-line-re)) (org-element-planning-parser limit)) ((and (memq mode (quote (planning property-drawer))) (looking-at org-property-drawer-re)) (org-element-property-drawer-parser limit)) ((not (bolp)) (org-element-paragraph-parser limit (list (point)))) ((looking-at org-clock-line-re) (org-element-clock-parser limit)) ((org-at-heading-p) (org-element-inlinetask-parser limit raw-secondary-p)) (t (let ((affiliated (org-element--collect-affiliated-keywords limit))) (cond ((and (cdr affiliated) (>= ... limit)) (goto-char (car affiliated)) (org-element-keyword-parser limit nil)) ((looking-at org-element--latex-begin-environment) (org-element-latex-environment-parser limit affiliated)) ((looking-at org-drawer-regexp) (org-element-drawer-parser limit affiliated)) ((looking-at "[ ]*:\\( \\|$\\)") (org-element-fixed-width-parser limit affiliated)) ((looking-at "[ ]*#") (goto-char (match-end 0)) (cond (... ... ...) (... ... ...) (... ... ...) (... ... ...) (... ... ...) (t ... ...))) ((looking-at org-footnote-definition-re) (org-element-footnote-definition-parser limit affiliated)) ((looking-at "[ ]*-\\{5,\\}[ ]*$") (org-element-horizontal-rule-parser limit affiliated)) ((looking-at "%%(") (org-element-diary-sexp-parser limit affiliated)) ((looking-at "[ ]*\\(|\\|\\+\\(-+\\+\\)+[ ]*$\\)") (org-element-table-parser limit affiliated)) ((looking-at (org-item-re)) (org-element-plain-list-parser limit affiliated (or structure ...))) (t (org-element-paragraph-parser limit affiliated))))))) (save-excursion (let ((case-fold-search t) (raw-secondary-p (and granularity (not (eq granularity (quote object)))))) (cond ((eq mode (quote item)) (org-element-item-parser limit structure raw-secondary-p)) ((eq mode (quote table-row)) (org-element-table-row-parser limit)) ((eq mode (quote node-property)) (org-element-node-property-parser limit)) ((progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp ...) (outline-regexp org-outline-regexp) (org-outline-regexp-bol ...)) (org-at-heading-p))) (org-element-headline-parser limit raw-secondary-p)) ((eq mode (quote section)) (org-element-section-parser limit)) ((eq mode (quote first-section)) (org-element-section-parser (or (save-excursion (progn ... ... ... ... ...)) limit))) ((and (eq mode (quote planning)) (looking-at org-planning-line-re)) (org-element-planning-parser limit)) ((and (memq mode (quote (planning property-drawer))) (looking-at org-property-drawer-re)) (org-element-property-drawer-parser limit)) ((not (bolp)) (org-element-paragraph-parser limit (list (point)))) ((looking-at org-clock-line-re) (org-element-clock-parser limit)) ((org-at-heading-p) (org-element-inlinetask-parser limit raw-secondary-p)) (t (let ((affiliated (org-element--collect-affiliated-keywords limit))) (cond ((and ... ...) (goto-char ...) (org-element-keyword-parser limit nil)) ((looking-at org-element--latex-begin-environment) (org-element-latex-environment-parser limit affiliated)) ((looking-at org-drawer-regexp) (org-element-drawer-parser limit affiliated)) ((looking-at "[ ]*:\\( \\|$\\)") (org-element-fixed-width-parser limit affiliated)) ((looking-at "[ ]*#") (goto-char ...) (cond ... ... ... ... ... ...)) ((looking-at org-footnote-definition-re) (org-element-footnote-definition-parser limit affiliated)) ((looking-at "[ ]*-\\{5,\\}[ ]*$") (org-element-horizontal-rule-parser limit affiliated)) ((looking-at "%%(") (org-element-diary-sexp-parser limit affiliated)) ((looking-at "[ ]*\\(|\\|\\+\\(-+\\+\\)+[ ]*$\\)") (org-element-table-parser limit affiliated)) ((looking-at ...) (org-element-plain-list-parser limit affiliated ...)) (t (org-element-paragraph-parser limit affiliated)))))))) org-element--current-element(98 element nil ((25 2 "- " nil nil nil 30) (30 2 "- " nil nil nil 39) (39 2 "- " nil nil nil 110) (53 4 "- " nil nil nil 72) (72 4 "- " nil nil nil 110))) (setq element (org-element--current-element end (quote element) mode (org-element-property :structure parent))) (if element nil (setq element (org-element--current-element end (quote element) mode (org-element-property :structure parent))) (org-element-put-property element :parent parent) (org-element--cache-put element)) (while t (if syncp (progn (cond ((= (point) pos) (throw (quote exit) parent)) ((org-element--cache-interrupt-p time-limit) (throw (quote interrupt) nil))))) (if element nil (setq element (org-element--current-element end (quote element) mode (org-element-property :structure parent))) (org-element-put-property element :parent parent) (org-element--cache-put element)) (let ((elem-end (org-element-property :end element)) (type (org-element-type element))) (cond ((and (<= elem-end pos) (/= (point-max) elem-end)) (goto-char elem-end) (setq mode (org-element--next-mode type nil))) ((not (memq type org-element-greater-elements)) (throw (quote exit) element)) ((let ((cbeg (org-element-property :contents-begin element)) (cend (org-element-property :contents-end element))) (if (or syncp (and cbeg cend ... ...)) (progn (goto-char ...) (setq next nil mode ... parent element end cend))))) (t (throw (quote exit) element)))) (setq element nil)) (let ((end (or (org-element-property :end element) (save-excursion (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) (outline-next-heading))) (point)))) (parent element)) (while t (if syncp (progn (cond ((= (point) pos) (throw (quote exit) parent)) ((org-element--cache-interrupt-p time-limit) (throw (quote interrupt) nil))))) (if element nil (setq element (org-element--current-element end (quote element) mode (org-element-property :structure parent))) (org-element-put-property element :parent parent) (org-element--cache-put element)) (let ((elem-end (org-element-property :end element)) (type (org-element-type element))) (cond ((and (<= elem-end pos) (/= (point-max) elem-end)) (goto-char elem-end) (setq mode (org-element--next-mode type nil))) ((not (memq type org-element-greater-elements)) (throw (quote exit) element)) ((let ((cbeg ...) (cend ...)) (if (or syncp ...) (progn ... ...)))) (t (throw (quote exit) element)))) (setq element nil))) (let* ((cached (and (org-element--cache-active-p) (org-element--cache-find pos nil))) (begin (org-element-property :begin cached)) element next mode) (cond ((not cached) (if (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp ...) (outline-regexp org-outline-regexp) (org-outline-regexp-bol ...)) (outline-previous-heading))) (progn (setq mode (quote planning)) (forward-line))) (skip-chars-forward " \n") (beginning-of-line)) ((= pos begin) (throw (quote exit) (if syncp (org-element-property :parent cached) cached))) ((re-search-backward (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp ...) (outline-regexp org-outline-regexp) (org-outline-regexp-bol ...)) org-outline-regexp-bol)) begin t) (forward-line) (skip-chars-forward " \n") (beginning-of-line) (setq mode (quote planning))) (t (let ((up cached) (pos (if (= ... pos) (1- pos) pos))) (goto-char (or (org-element-property :contents-begin cached) begin)) (while (let ((end ...)) (and (<= end pos) (goto-char end) (setq up ...)))) (cond ((not up)) ((eobp) (setq element up)) (t (setq element up next (point))))))) (let ((end (or (org-element-property :end element) (save-excursion (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ... ...)) (point)))) (parent element)) (while t (if syncp (progn (cond ((= ... pos) (throw ... parent)) ((org-element--cache-interrupt-p time-limit) (throw ... nil))))) (if element nil (setq element (org-element--current-element end (quote element) mode (org-element-property :structure parent))) (org-element-put-property element :parent parent) (org-element--cache-put element)) (let ((elem-end (org-element-property :end element)) (type (org-element-type element))) (cond ((and (<= elem-end pos) (/= ... elem-end)) (goto-char elem-end) (setq mode (org-element--next-mode type nil))) ((not (memq type org-element-greater-elements)) (throw (quote exit) element)) ((let (... ...) (if ... ...))) (t (throw (quote exit) element)))) (setq element nil)))) (save-restriction (widen) (goto-char pos) (let* ((cached (and (org-element--cache-active-p) (org-element--cache-find pos nil))) (begin (org-element-property :begin cached)) element next mode) (cond ((not cached) (if (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) (outline-previous-heading))) (progn (setq mode (quote planning)) (forward-line))) (skip-chars-forward " \n") (beginning-of-line)) ((= pos begin) (throw (quote exit) (if syncp (org-element-property :parent cached) cached))) ((re-search-backward (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) org-outline-regexp-bol)) begin t) (forward-line) (skip-chars-forward " \n") (beginning-of-line) (setq mode (quote planning))) (t (let ((up cached) (pos (if ... ... pos))) (goto-char (or (org-element-property :contents-begin cached) begin)) (while (let (...) (and ... ... ...))) (cond ((not up)) ((eobp) (setq element up)) (t (setq element up next ...)))))) (let ((end (or (org-element-property :end element) (save-excursion (progn ... ... ... ... ...) (point)))) (parent element)) (while t (if syncp (progn (cond (... ...) (... ...)))) (if element nil (setq element (org-element--current-element end (quote element) mode (org-element-property :structure parent))) (org-element-put-property element :parent parent) (org-element--cache-put element)) (let ((elem-end (org-element-property :end element)) (type (org-element-type element))) (cond ((and ... ...) (goto-char elem-end) (setq mode ...)) ((not ...) (throw ... element)) ((let ... ...)) (t (throw ... element)))) (setq element nil))))) (save-excursion (save-restriction (widen) (goto-char pos) (let* ((cached (and (org-element--cache-active-p) (org-element--cache-find pos nil))) (begin (org-element-property :begin cached)) element next mode) (cond ((not cached) (if (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ... ...)) (progn (setq mode ...) (forward-line))) (skip-chars-forward " \n") (beginning-of-line)) ((= pos begin) (throw (quote exit) (if syncp (org-element-property :parent cached) cached))) ((re-search-backward (progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ... org-outline-regexp-bol)) begin t) (forward-line) (skip-chars-forward " \n") (beginning-of-line) (setq mode (quote planning))) (t (let ((up cached) (pos ...)) (goto-char (or ... begin)) (while (let ... ...)) (cond (...) (... ...) (t ...))))) (let ((end (or (org-element-property :end element) (save-excursion ... ...))) (parent element)) (while t (if syncp (progn (cond ... ...))) (if element nil (setq element (org-element--current-element end ... mode ...)) (org-element-put-property element :parent parent) (org-element--cache-put element)) (let ((elem-end ...) (type ...)) (cond (... ... ...) (... ...) (...) (t ...))) (setq element nil)))))) (catch (quote exit) (save-excursion (save-restriction (widen) (goto-char pos) (let* ((cached (and (org-element--cache-active-p) (org-element--cache-find pos nil))) (begin (org-element-property :begin cached)) element next mode) (cond ((not cached) (if (progn ... ... ... ... ...) (progn ... ...)) (skip-chars-forward " \n") (beginning-of-line)) ((= pos begin) (throw (quote exit) (if syncp ... cached))) ((re-search-backward (progn ... ... ... ... ...) begin t) (forward-line) (skip-chars-forward " \n") (beginning-of-line) (setq mode (quote planning))) (t (let (... ...) (goto-char ...) (while ...) (cond ... ... ...)))) (let ((end (or ... ...)) (parent element)) (while t (if syncp (progn ...)) (if element nil (setq element ...) (org-element-put-property element :parent parent) (org-element--cache-put element)) (let (... ...) (cond ... ... ... ...)) (setq element nil))))))) org-element--parse-to(77) (cond ((bobp) nil) ((progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp (org-get-limited-outline-regexp)) (outline-regexp org-outline-regexp) (org-outline-regexp-bol (concat "^" org-outline-regexp))) (org-at-heading-p))) (beginning-of-line) (org-element-headline-parser (point-max) t)) (t (if (org-element--cache-active-p) (progn (if (not org-element--cache) (org-element-cache-reset) (org-element--cache-sync (current-buffer) origin)))) (org-element--parse-to origin))) (let ((origin (point))) (end-of-line) (skip-chars-backward " \n") (cond ((bobp) nil) ((progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp (org-get-limited-outline-regexp)) (outline-regexp org-outline-regexp) (org-outline-regexp-bol (concat "^" org-outline-regexp))) (org-at-heading-p))) (beginning-of-line) (org-element-headline-parser (point-max) t)) (t (if (org-element--cache-active-p) (progn (if (not org-element--cache) (org-element-cache-reset) (org-element--cache-sync (current-buffer) origin)))) (org-element--parse-to origin)))) (save-restriction (widen) (let ((origin (point))) (end-of-line) (skip-chars-backward " \n") (cond ((bobp) nil) ((progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp ...) (outline-regexp org-outline-regexp) (org-outline-regexp-bol ...)) (org-at-heading-p))) (beginning-of-line) (org-element-headline-parser (point-max) t)) (t (if (org-element--cache-active-p) (progn (if (not org-element--cache) (org-element-cache-reset) (org-element--cache-sync ... origin)))) (org-element--parse-to origin))))) (save-excursion (save-restriction (widen) (let ((origin (point))) (end-of-line) (skip-chars-backward " \n") (cond ((bobp) nil) ((progn (defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) (org-at-heading-p))) (beginning-of-line) (org-element-headline-parser (point-max) t)) (t (if (org-element--cache-active-p) (progn (if ... ... ...))) (org-element--parse-to origin)))))) org-element-at-point() (or element (org-element-at-point)) (let* ((pos (point)) (element (or element (org-element-at-point))) (type (org-element-type element)) (post (org-element-property :post-affiliated element))) (cond ((and post (< pos post)) (beginning-of-line) (let ((case-fold-search t)) (looking-at org-element--affiliated-re)) (cond ((not (member-ignore-case (match-string 1) org-element-parsed-keywords)) (throw (quote objects-forbidden) element)) ((< (match-end 0) pos) (narrow-to-region (match-end 0) (line-end-position))) ((and (match-beginning 2) (>= pos (match-beginning 2)) (< pos (match-end 2))) (narrow-to-region (match-beginning 2) (match-end 2))) (t (throw (quote objects-forbidden) element))) (setq type (quote keyword))) ((eq type (quote item)) (let ((tag (org-element-property :tag element))) (if (or (not tag) (/= (line-beginning-position) post)) (throw (quote objects-forbidden) element) (beginning-of-line) (search-forward tag (line-end-position)) (goto-char (match-beginning 0)) (if (and (>= pos ...) (< pos ...)) (narrow-to-region (point) (match-end 0)) (throw (quote objects-forbidden) element))))) ((memq type (quote (headline inlinetask))) (goto-char (org-element-property :begin element)) (looking-at org-complex-heading-regexp) (let ((end (match-end 4))) (if (not end) (throw (quote objects-forbidden) element) (goto-char (match-beginning 4)) (if (let (case-fold-search) (looking-at org-comment-string)) (progn (goto-char ...))) (if (>= (point) end) (throw (quote objects-forbidden) element) (narrow-to-region (point) end))))) ((memq type (quote (paragraph table-row verse-block))) (let ((cbeg (org-element-property :contents-begin element)) (cend (org-element-property :contents-end element))) (if (and cbeg cend (>= pos cbeg) (or (< pos cend) (and ... ...))) (narrow-to-region cbeg cend) (throw (quote objects-forbidden) element)))) ((eq type (quote planning)) (let ((--dolist-tail-- (quote (:closed :deadline :scheduled))) p) (while --dolist-tail-- (setq p (car --dolist-tail--)) (let ((timestamp ...)) (if (and timestamp ... ...) (progn ...))) (setq --dolist-tail-- (cdr --dolist-tail--)))) (throw (quote objects-forbidden) element)) (t (throw (quote objects-forbidden) element))) (goto-char (point-min)) (let ((restriction (org-element-restriction type)) (parent element) (cache (cond ((not (org-element--cache-active-p)) nil) (org-element--cache-objects (gethash element org-element--cache-objects)) (t (org-element-cache-reset) nil))) next object-data last) (prog1 (catch (quote exit) (while t (if next nil (let (...) (if data ... ...))) (catch (quote found) (if next (setq next ...) (let ... ...)) (if next (progn ... ...) (setcar ... t))) (if (or (not next) (> ... pos)) (throw (quote exit) (or last parent)) (let (... ... ...) (cond ... ... ...))))) (org-element--cache-put element cache)))) (save-restriction (widen) (let* ((pos (point)) (element (or element (org-element-at-point))) (type (org-element-type element)) (post (org-element-property :post-affiliated element))) (cond ((and post (< pos post)) (beginning-of-line) (let ((case-fold-search t)) (looking-at org-element--affiliated-re)) (cond ((not (member-ignore-case ... org-element-parsed-keywords)) (throw (quote objects-forbidden) element)) ((< (match-end 0) pos) (narrow-to-region (match-end 0) (line-end-position))) ((and (match-beginning 2) (>= pos ...) (< pos ...)) (narrow-to-region (match-beginning 2) (match-end 2))) (t (throw (quote objects-forbidden) element))) (setq type (quote keyword))) ((eq type (quote item)) (let ((tag (org-element-property :tag element))) (if (or (not tag) (/= ... post)) (throw (quote objects-forbidden) element) (beginning-of-line) (search-forward tag (line-end-position)) (goto-char (match-beginning 0)) (if (and ... ...) (narrow-to-region ... ...) (throw ... element))))) ((memq type (quote (headline inlinetask))) (goto-char (org-element-property :begin element)) (looking-at org-complex-heading-regexp) (let ((end (match-end 4))) (if (not end) (throw (quote objects-forbidden) element) (goto-char (match-beginning 4)) (if (let ... ...) (progn ...)) (if (>= ... end) (throw ... element) (narrow-to-region ... end))))) ((memq type (quote (paragraph table-row verse-block))) (let ((cbeg (org-element-property :contents-begin element)) (cend (org-element-property :contents-end element))) (if (and cbeg cend (>= pos cbeg) (or ... ...)) (narrow-to-region cbeg cend) (throw (quote objects-forbidden) element)))) ((eq type (quote planning)) (let ((--dolist-tail-- (quote ...)) p) (while --dolist-tail-- (setq p (car --dolist-tail--)) (let (...) (if ... ...)) (setq --dolist-tail-- (cdr --dolist-tail--)))) (throw (quote objects-forbidden) element)) (t (throw (quote objects-forbidden) element))) (goto-char (point-min)) (let ((restriction (org-element-restriction type)) (parent element) (cache (cond ((not ...) nil) (org-element--cache-objects (gethash element org-element--cache-objects)) (t (org-element-cache-reset) nil))) next object-data last) (prog1 (catch (quote exit) (while t (if next nil (let ... ...)) (catch (quote found) (if next ... ...) (if next ... ...)) (if (or ... ...) (throw ... ...) (let ... ...)))) (org-element--cache-put element cache))))) (save-excursion (save-restriction (widen) (let* ((pos (point)) (element (or element (org-element-at-point))) (type (org-element-type element)) (post (org-element-property :post-affiliated element))) (cond ((and post (< pos post)) (beginning-of-line) (let ((case-fold-search t)) (looking-at org-element--affiliated-re)) (cond ((not ...) (throw ... element)) ((< ... pos) (narrow-to-region ... ...)) ((and ... ... ...) (narrow-to-region ... ...)) (t (throw ... element))) (setq type (quote keyword))) ((eq type (quote item)) (let ((tag ...)) (if (or ... ...) (throw ... element) (beginning-of-line) (search-forward tag ...) (goto-char ...) (if ... ... ...)))) ((memq type (quote (headline inlinetask))) (goto-char (org-element-property :begin element)) (looking-at org-complex-heading-regexp) (let ((end ...)) (if (not end) (throw ... element) (goto-char ...) (if ... ...) (if ... ... ...)))) ((memq type (quote (paragraph table-row verse-block))) (let ((cbeg ...) (cend ...)) (if (and cbeg cend ... ...) (narrow-to-region cbeg cend) (throw ... element)))) ((eq type (quote planning)) (let ((--dolist-tail-- ...) p) (while --dolist-tail-- (setq p ...) (let ... ...) (setq --dolist-tail-- ...))) (throw (quote objects-forbidden) element)) (t (throw (quote objects-forbidden) element))) (goto-char (point-min)) (let ((restriction (org-element-restriction type)) (parent element) (cache (cond (... nil) (org-element--cache-objects ...) (t ... nil))) next object-data last) (prog1 (catch (quote exit) (while t (if next nil ...) (catch ... ... ...) (if ... ... ...))) (org-element--cache-put element cache)))))) (catch (quote objects-forbidden) (save-excursion (save-restriction (widen) (let* ((pos (point)) (element (or element (org-element-at-point))) (type (org-element-type element)) (post (org-element-property :post-affiliated element))) (cond ((and post (< pos post)) (beginning-of-line) (let (...) (looking-at org-element--affiliated-re)) (cond (... ...) (... ...) (... ...) (t ...)) (setq type (quote keyword))) ((eq type (quote item)) (let (...) (if ... ... ... ... ... ...))) ((memq type (quote ...)) (goto-char (org-element-property :begin element)) (looking-at org-complex-heading-regexp) (let (...) (if ... ... ... ... ...))) ((memq type (quote ...)) (let (... ...) (if ... ... ...))) ((eq type (quote planning)) (let (... p) (while --dolist-tail-- ... ... ...)) (throw (quote objects-forbidden) element)) (t (throw (quote objects-forbidden) element))) (goto-char (point-min)) (let ((restriction (org-element-restriction type)) (parent element) (cache (cond ... ... ...)) next object-data last) (prog1 (catch (quote exit) (while t ... ... ...)) (org-element--cache-put element cache))))))) org-element-context() org-babel-exp-process-buffer(#<2>>) org-export-execute-babel-code() org-export-as(html nil nil nil (:output-file "./org-bug.html")) org-export-to-file(html "./org-bug.html" nil nil nil nil nil) org-html-export-to-html(nil nil nil nil) org-export-dispatch(nil) funcall-interactively(org-export-dispatch nil) #(org-export-dispatch nil nil) ad-Advice-call-interactively(# org-export-dispatch nil nil) apply(ad-Advice-call-interactively # (org-export-dispatch nil nil)) call-interactively(org-export-dispatch nil nil) command-execute(org-export-dispatch) Thanks! Shlomi Emacs : GNU Emacs 25.0.50.1 (x86_64-apple-darwin13.4.0, NS appkit-1265.21 Version 10.9.5 (Build 13F1112)) of 2015-11-10 Package: Org-mode version 8.3.4 (8.3.4-9-gfda14f-elpa @ /Users/vaknins9/.emacs.d/elpa/org-20160307/) current state: ============== (setq org-src-lang-modes '(("browser" . html) ("ocaml" . tuareg) ("elisp" . emacs-lisp) ("ditaa" . artist) ("asymptote" . asy) ("dot" . fundamental) ("sqlite" . sql) ("calc" . fundamental) ("C" . c) ("cpp" . c++) ("C++" . c++) ("screen" . shell-script) ("shell" . sh) ("bash" . sh)) org-tab-first-hook '(org-hide-block-toggle-maybe org-babel-hide-result-toggle-maybe org-babel-header-arg-expand) org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}" ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) ("article" "\\documentclass[11pt]{article}" ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" . "\\subparagraph*{%s}")) ("report" "\\documentclass[11pt]{report}" ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) ) org-reveal-slide-number "c" org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook) org-time-clocksum-format '(:work-days "%dd " :hours "%d" :require-hours t :minutes ":%02d" :require-minutes t) org-occur-hook '(org-first-headline-recenter) org-metaup-hook '(org-babel-load-in-session-maybe) org-html-format-drawer-function '(lambda (name contents) contents) org-log-done 'time org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function org-confirm-shell-link-function 'yes-or-no-p org-image-actual-width 100 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default org-latex-pdf-process '("pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f" "pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f" "pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f") org-agenda-custom-commands '(("r" tags-todo "ri") ("T" tags-todo "tali")) org-latex-format-headline-function 'org-latex-format-headline-default-function org-after-todo-state-change-hook '(org-clock-out-if-current) org-latex-format-drawer-function '(lambda (name contents) contents) org-from-is-user-regexp "\\" org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer) org-agenda-before-write-hook '(org-agenda-add-entry-text) org-babel-pre-tangle-hook '(save-buffer) org-mode-hook '(org-mode-reftex-setup (lambda nil (org-bullets-mode 1)) er/add-org-mode-expansions #[nil "\300\301\302\303\304$\207" [org-add-hook change-major-mode-hook org-show-block-all append local] 5] #[nil "\300\301\302\303\304$\207" [org-add-hook change-major-mode-hook org-babel-show-result-all append local] 5] org-babel-result-hide-spec org-babel-hide-all-hashes #[nil "\300\301!\207" [run-hooks prelude-org-mode-hook] 2]) org-export-coding-system 'utf-8 org-archive-hook '(org-attach-archive-delete-maybe) org-ascii-format-drawer-function '(lambda (name contents width) contents) org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe) org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines org-optimize-window-after-visibility-change) org-ditaa-eps-jar-path "/Users/vaknins9/.emacs.d/elpa/contrib/scripts/DitaaEps.jar" org-link-abbrev-alist '(("papers" . "~/papers/%s.pdf")) org-latex-packages-alist '(("" "minted" nil)) org-babel-tangle-lang-exts '(("D" . "d") ("C++" . "cpp") ("python" . "py") ("clojure" . "clj") ("emacs-lisp" . "el") ("elisp" . "el")) org-confirm-elisp-link-function 'yes-or-no-p org-html-htmlize-output-type 'css org-metadown-hook '(org-babel-pop-to-session-maybe) org-babel-after-execute-hook '(org-redisplay-inline-images) org-latex-listings 'minted org-ditaa-jar-path "~/org-mode/org-8.2.7c/contrib/scripts/ditaa.jar" org-html-format-headline-function 'org-html-format-headline-default-function org-structure-template-alist '(("f" "#+BEGIN_info\n?\n#+END_info" "
\n\n
") ("n" "#+BEGIN_note\n?\n#+END_note" "
\n\n
") ("w" "#+BEGIN_warning\n?\n#+END_warning" "
\n\n
") ("t" "#+BEGIN_TIP\n?\n#+END_TIP" "
\n\n
") ("sho" "#+BEGIN_SRC sh :exports code :result none\n?\n#+END_SRC" "\n\n") ("cljo" "#+BEGIN_SRC clojure :exports code :result none\n?\n#+END_SRC" "\n\n") ("clj" "#+BEGIN_SRC clojure ?\n\n#+END_SRC" "\n\n") ("n" "#+BEGIN_NOTES\n?\n#+END_NOTES") ("s" "#+BEGIN_SRC ?\n\n#+END_SRC") ("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE") ("q" "#+BEGIN_QUOTE\n?\n#+END_QUOTE") ("v" "#+BEGIN_VERSE\n?\n#+END_VERSE") ("V" "#+BEGIN_VERBATIM\n?\n#+END_VERBATIM") ("c" "#+BEGIN_CENTER\n?\n#+END_CENTER") ("l" "#+BEGIN_LaTeX\n?\n#+END_LaTeX") ("L" "#+LaTeX: ") ("h" "#+BEGIN_HTML\n?\n#+END_HTML") ("H" "#+HTML: ") ("a" "#+BEGIN_ASCII\n?\n#+END_ASCII") ("A" "#+ASCII: ") ("i" "#+INDEX: ?") ("I" "#+INCLUDE: %file ?")) org-mime-html-hook '(inline-css) org-babel-load-languages '((ditaa . t) (python . t) (C . t) (clojure . t) (emacs-lisp . t) (clojure . t) (sh . t) (gnuplot . t)) org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function org-agenda-files '("~/org/work-august-2015.org" "~/org/home.org" "~/org/ notes.org") org-clock-out-hook '(org-clock-remove-empty-clock-drawer) org-confirm-babel-evaluate nil org-publish-project-alist '(("default" :base-directory "/Users/vaknins9/projects/blog/org//" :base-extension "org" :publishing-directory "/Users/vaknins9/projects/blog//" :publishing-function org-html-publish-to-html :headline-levels 4 :section-numbers nil :with-toc nil :html-head "" :html-preamble t :recursive t :make-index t :html-extension "html" :body-only t) ("post" :base-directory "/Users/vaknins9/projects/blog/org//" :base-extension "org" :publishing-directory "/Users/vaknins9/projects/blog//_posts/" :publishing-function org-html-publish-to-html :headline-levels 4 :section-numbers nil :with-toc nil :html-head "" :html-preamble t :recursive t :make-index t :html-extension "html" :body-only t) ("images" :base-directory "/Users/vaknins9/projects/blog/org//img" :base-extension "jpg\\|gif\\|png" :publishing-directory "/Users/vaknins9/projects/blog//img" :publishing-function org-publish-attachment :recursive t) ("js" :base-directory "/Users/vaknins9/projects/blog/org//js" :base-extension "js" :publishing-directory "/Users/vaknins9/projects/blog//js" :publishing-function org-publish-attachment :recursive t) ("css" :base-directory "/Users/vaknins9/projects/blog/org//css" :base-extension "css\\|el" :publishing-directory "/Users/vaknins9/projects/blog//css" :publishing-function org-publish-attachment :recursive t) ("web" :components ("images" "js" "css"))) ) --001a113a7e7c277203052d93c26e Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable
Hey,

I am a heavy org-mo= de user, and I absolutely love it! One of my org-files stopped being export= able at some point. I managed to trace it to something to do with inline so= urce blocks (of course it might not be the root cause..)

I am getting an exception (Wrong type argument: integer-or-marker-p,= nil) when trying to export an org file with inlined code. Here is the small= est org file I could came up with that produces this error:

<= /div>
-----=C2=A0
* Test a
=C2=A0 - src_elisp{3}

* Test Q
=C2=A0 - src_elisp{3}
= =C2=A0 - test
=C2=A0 - something
=C2=A0 =C2=A0 - src_el= isp{3}
=C2=A0 =C2=A0 - src_elisp{3} {{{results(=3D3=3D)}}}
<= div>=C2=A0 - src_elisp{3} {{{results(=3D3=3D)}}}
-----
=
If I remove any of the last {{{result...}}} sections the err= or goes away.

Could this be related to the new inl= ine result format?

Here is a backtrace:
= Debugger entered--Lisp error: (wrong-type-argument integer-or-marker-p nil)=
=C2=A0 goto-char(nil)
=C2=A0 (progn (goto-char content= s-end) (skip-chars-forward "
=C2=A0 =C2=A0 \n" limit) (= if (=3D (point) limit) limit (line-beginning-position)))
=C2=A0 (= let* ((struct (or structure (org-element--list-struct limit))) (type (cond = ((org-looking-at-p "[ =C2=A0 =C2=A0 ]*[A-Za-z0-9]") (quote ordere= d)) ((nth 5 (assq (point) struct)) (quote descriptive)) (t (quote unordered= )))) (contents-begin (point)) (begin (car affiliated)) (contents-end (let* = ((item (assq contents-begin struct)) (ind (nth 1 item)) (pos (nth 6 item)))= (while (and (setq item (assq pos struct)) (=3D (nth 1 item) ind)) (setq po= s (nth 6 item))) pos)) (end (progn (goto-char contents-end) (skip-chars-for= ward "
=C2=A0 =C2=A0 \n" limit) (if (=3D (point) limit)= limit (line-beginning-position))))) (list (quote plain-list) (nconc (list = :type type :begin begin :end end :contents-begin contents-begin :contents-e= nd contents-end :structure struct :post-blank (count-lines contents-end end= ) :post-affiliated contents-begin) (cdr affiliated))))
=C2=A0 (sa= ve-excursion (let* ((struct (or structure (org-element--list-struct limit))= ) (type (cond ((org-looking-at-p "[ =C2=A0 =C2=A0 ]*[A-Za-z0-9]")= (quote ordered)) ((nth 5 (assq ... struct)) (quote descriptive)) (t (quote= unordered)))) (contents-begin (point)) (begin (car affiliated)) (contents-= end (let* ((item (assq contents-begin struct)) (ind (nth 1 item)) (pos (nth= 6 item))) (while (and (setq item ...) (=3D ... ind)) (setq pos (nth 6 item= ))) pos)) (end (progn (goto-char contents-end) (skip-chars-forward "
=C2=A0 =C2=A0 \n" limit) (if (=3D (point) limit) limit (line-= beginning-position))))) (list (quote plain-list) (nconc (list :type type :b= egin begin :end end :contents-begin contents-begin :contents-end contents-e= nd :structure struct :post-blank (count-lines contents-end end) :post-affil= iated contents-begin) (cdr affiliated)))))
=C2=A0 org-element-pla= in-list-parser(98 (60) ((25 2 "- " nil nil nil 30) (30 2 "- = " nil nil nil 39) (39 2 "- " nil nil nil 110) (53 4 "- = " nil nil nil 72) (72 4 "- " nil nil nil 110)))
= =C2=A0 (cond ((and (cdr affiliated) (>=3D (point) limit)) (goto-char (ca= r affiliated)) (org-element-keyword-parser limit nil)) ((looking-at org-ele= ment--latex-begin-environment) (org-element-latex-environment-parser limit = affiliated)) ((looking-at org-drawer-regexp) (org-element-drawer-parser lim= it affiliated)) ((looking-at "[ =C2=A0 ]*:\\( \\|$\\)") (org-elem= ent-fixed-width-parser limit affiliated)) ((looking-at "[ =C2=A0 =C2= =A0 ]*#") (goto-char (match-end 0)) (cond ((looking-at "\\(?: \\|= $\\)") (beginning-of-line) (org-element-comment-parser limit affiliate= d)) ((looking-at "\\+BEGIN_\\(\\S-+\\)") (beginning-of-line) (let= ((parser (assoc ... org-element-block-name-alist))) (if parser (funcall (c= dr parser) limit affiliated) (org-element-special-block-parser limit affili= ated)))) ((looking-at "\\+CALL:") (beginning-of-line) (org-elemen= t-babel-call-parser limit affiliated)) ((looking-at "\\+BEGIN:? "= ) (beginning-of-line) (org-element-dynamic-block-parser limit affiliated)) = ((looking-at "\\+\\S-+:") (beginning-of-line) (org-element-keywor= d-parser limit affiliated)) (t (beginning-of-line) (org-element-paragraph-p= arser limit affiliated)))) ((looking-at org-footnote-definition-re) (org-el= ement-footnote-definition-parser limit affiliated)) ((looking-at "[ = =C2=A0 ]*-\\{5,\\}[ =C2=A0 =C2=A0]*$") (org-element-horizontal-rule-pa= rser limit affiliated)) ((looking-at "%%(") (org-element-diary-se= xp-parser limit affiliated)) ((looking-at "[ =C2=A0]*\\(|\\|\\+\\(-+\\= +\\)+[ =C2=A0 ]*$\\)") (org-element-table-parser limit affiliated)) ((= looking-at (org-item-re)) (org-element-plain-list-parser limit affiliated (= or structure (org-element--list-struct limit)))) (t (org-element-paragraph-= parser limit affiliated)))
=C2=A0 (let ((affiliated (org-element-= -collect-affiliated-keywords limit))) (cond ((and (cdr affiliated) (>=3D= (point) limit)) (goto-char (car affiliated)) (org-element-keyword-parser l= imit nil)) ((looking-at org-element--latex-begin-environment) (org-element-= latex-environment-parser limit affiliated)) ((looking-at org-drawer-regexp)= (org-element-drawer-parser limit affiliated)) ((looking-at "[ =C2=A0]= *:\\( \\|$\\)") (org-element-fixed-width-parser limit affiliated)) ((l= ooking-at "[ =C2=A0 =C2=A0 ]*#") (goto-char (match-end 0)) (cond = ((looking-at "\\(?: \\|$\\)") (beginning-of-line) (org-element-co= mment-parser limit affiliated)) ((looking-at "\\+BEGIN_\\(\\S-+\\)&quo= t;) (beginning-of-line) (let ((parser ...)) (if parser (funcall ... limit a= ffiliated) (org-element-special-block-parser limit affiliated)))) ((looking= -at "\\+CALL:") (beginning-of-line) (org-element-babel-call-parse= r limit affiliated)) ((looking-at "\\+BEGIN:? ") (beginning-of-li= ne) (org-element-dynamic-block-parser limit affiliated)) ((looking-at "= ;\\+\\S-+:") (beginning-of-line) (org-element-keyword-parser limit aff= iliated)) (t (beginning-of-line) (org-element-paragraph-parser limit affili= ated)))) ((looking-at org-footnote-definition-re) (org-element-footnote-def= inition-parser limit affiliated)) ((looking-at "[ =C2=A0 =C2=A0 ]*-\\{= 5,\\}[ =C2=A0 =C2=A0]*$") (org-element-horizontal-rule-parser limit af= filiated)) ((looking-at "%%(") (org-element-diary-sexp-parser lim= it affiliated)) ((looking-at "[ =C2=A0]*\\(|\\|\\+\\(-+\\+\\)+[ =C2=A0= ]*$\\)") (org-element-table-parser limit affiliated)) ((looking-at (o= rg-item-re)) (org-element-plain-list-parser limit affiliated (or structure = (org-element--list-struct limit)))) (t (org-element-paragraph-parser limit = affiliated))))
=C2=A0 (cond ((eq mode (quote item)) (org-element-= item-parser limit structure raw-secondary-p)) ((eq mode (quote table-row)) = (org-element-table-row-parser limit)) ((eq mode (quote node-property)) (org= -element-node-property-parser limit)) ((progn (defvar org-called-with-limit= ed-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-= outline-regexp-bol) (let* ((org-called-with-limited-levels t) (org-outline-= regexp (org-get-limited-outline-regexp)) (outline-regexp org-outline-regexp= ) (org-outline-regexp-bol (concat "^" org-outline-regexp))) (org-= at-heading-p))) (org-element-headline-parser limit raw-secondary-p)) ((eq m= ode (quote section)) (org-element-section-parser limit)) ((eq mode (quote f= irst-section)) (org-element-section-parser (or (save-excursion (progn (defv= ar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar outl= ine-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) (outlin= e-next-heading)))) limit))) ((and (eq mode (quote planning)) (looking-at or= g-planning-line-re)) (org-element-planning-parser limit)) ((and (memq mode = (quote (planning property-drawer))) (looking-at org-property-drawer-re)) (o= rg-element-property-drawer-parser limit)) ((not (bolp)) (org-element-paragr= aph-parser limit (list (point)))) ((looking-at org-clock-line-re) (org-elem= ent-clock-parser limit)) ((org-at-heading-p) (org-element-inlinetask-parser= limit raw-secondary-p)) (t (let ((affiliated (org-element--collect-affilia= ted-keywords limit))) (cond ((and (cdr affiliated) (>=3D (point) limit))= (goto-char (car affiliated)) (org-element-keyword-parser limit nil)) ((loo= king-at org-element--latex-begin-environment) (org-element-latex-environmen= t-parser limit affiliated)) ((looking-at org-drawer-regexp) (org-element-dr= awer-parser limit affiliated)) ((looking-at "[ =C2=A0 ]*:\\( \\|$\\)&q= uot;) (org-element-fixed-width-parser limit affiliated)) ((looking-at "= ;[ =C2=A0 =C2=A0 ]*#") (goto-char (match-end 0)) (cond ((looking-at &q= uot;\\(?: \\|$\\)") (beginning-of-line) (org-element-comment-parser li= mit affiliated)) ((looking-at "\\+BEGIN_\\(\\S-+\\)") (beginning-= of-line) (let ... ...)) ((looking-at "\\+CALL:") (beginning-of-li= ne) (org-element-babel-call-parser limit affiliated)) ((looking-at "\\= +BEGIN:? ") (beginning-of-line) (org-element-dynamic-block-parser limi= t affiliated)) ((looking-at "\\+\\S-+:") (beginning-of-line) (org= -element-keyword-parser limit affiliated)) (t (beginning-of-line) (org-elem= ent-paragraph-parser limit affiliated)))) ((looking-at org-footnote-definit= ion-re) (org-element-footnote-definition-parser limit affiliated)) ((lookin= g-at "[ =C2=A0 ]*-\\{5,\\}[ =C2=A0 =C2=A0]*$") (org-element-horiz= ontal-rule-parser limit affiliated)) ((looking-at "%%(") (org-ele= ment-diary-sexp-parser limit affiliated)) ((looking-at "[ =C2=A0]*\\(|= \\|\\+\\(-+\\+\\)+[ =C2=A0 ]*$\\)") (org-element-table-parser limit af= filiated)) ((looking-at (org-item-re)) (org-element-plain-list-parser limit= affiliated (or structure (org-element--list-struct limit)))) (t (org-eleme= nt-paragraph-parser limit affiliated))))))
=C2=A0 (let ((case-fol= d-search t) (raw-secondary-p (and granularity (not (eq granularity (quote o= bject)))))) (cond ((eq mode (quote item)) (org-element-item-parser limit st= ructure raw-secondary-p)) ((eq mode (quote table-row)) (org-element-table-r= ow-parser limit)) ((eq mode (quote node-property)) (org-element-node-proper= ty-parser limit)) ((progn (defvar org-called-with-limited-levels) (defvar o= rg-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) = (let* ((org-called-with-limited-levels t) (org-outline-regexp (org-get-limi= ted-outline-regexp)) (outline-regexp org-outline-regexp) (org-outline-regex= p-bol (concat "^" org-outline-regexp))) (org-at-heading-p))) (org= -element-headline-parser limit raw-secondary-p)) ((eq mode (quote section))= (org-element-section-parser limit)) ((eq mode (quote first-section)) (org-= element-section-parser (or (save-excursion (progn (defvar org-called-with-l= imited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (defvar = org-outline-regexp-bol) (let* ... ...))) limit))) ((and (eq mode (quote pla= nning)) (looking-at org-planning-line-re)) (org-element-planning-parser lim= it)) ((and (memq mode (quote (planning property-drawer))) (looking-at org-p= roperty-drawer-re)) (org-element-property-drawer-parser limit)) ((not (bolp= )) (org-element-paragraph-parser limit (list (point)))) ((looking-at org-cl= ock-line-re) (org-element-clock-parser limit)) ((org-at-heading-p) (org-ele= ment-inlinetask-parser limit raw-secondary-p)) (t (let ((affiliated (org-el= ement--collect-affiliated-keywords limit))) (cond ((and (cdr affiliated) (&= gt;=3D ... limit)) (goto-char (car affiliated)) (org-element-keyword-parser= limit nil)) ((looking-at org-element--latex-begin-environment) (org-elemen= t-latex-environment-parser limit affiliated)) ((looking-at org-drawer-regex= p) (org-element-drawer-parser limit affiliated)) ((looking-at "[ =C2= =A0]*:\\( \\|$\\)") (org-element-fixed-width-parser limit affiliated))= ((looking-at "[ =C2=A0 =C2=A0 ]*#") (goto-char (match-end 0)) (c= ond (... ... ...) (... ... ...) (... ... ...) (... ... ...) (... ... ...) (= t ... ...))) ((looking-at org-footnote-definition-re) (org-element-footnote= -definition-parser limit affiliated)) ((looking-at "[ =C2=A0 ]*-\\{5,\= \}[ =C2=A0 =C2=A0]*$") (org-element-horizontal-rule-parser limit affil= iated)) ((looking-at "%%(") (org-element-diary-sexp-parser limit = affiliated)) ((looking-at "[ =C2=A0]*\\(|\\|\\+\\(-+\\+\\)+[ =C2=A0 ]*= $\\)") (org-element-table-parser limit affiliated)) ((looking-at (org-= item-re)) (org-element-plain-list-parser limit affiliated (or structure ...= ))) (t (org-element-paragraph-parser limit affiliated)))))))
=C2= =A0 (save-excursion (let ((case-fold-search t) (raw-secondary-p (and granul= arity (not (eq granularity (quote object)))))) (cond ((eq mode (quote item)= ) (org-element-item-parser limit structure raw-secondary-p)) ((eq mode (quo= te table-row)) (org-element-table-row-parser limit)) ((eq mode (quote node-= property)) (org-element-node-property-parser limit)) ((progn (defvar org-ca= lled-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regex= p) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t= ) (org-outline-regexp ...) (outline-regexp org-outline-regexp) (org-outline= -regexp-bol ...)) (org-at-heading-p))) (org-element-headline-parser limit r= aw-secondary-p)) ((eq mode (quote section)) (org-element-section-parser lim= it)) ((eq mode (quote first-section)) (org-element-section-parser (or (save= -excursion (progn ... ... ... ... ...)) limit))) ((and (eq mode (quote plan= ning)) (looking-at org-planning-line-re)) (org-element-planning-parser limi= t)) ((and (memq mode (quote (planning property-drawer))) (looking-at org-pr= operty-drawer-re)) (org-element-property-drawer-parser limit)) ((not (bolp)= ) (org-element-paragraph-parser limit (list (point)))) ((looking-at org-clo= ck-line-re) (org-element-clock-parser limit)) ((org-at-heading-p) (org-elem= ent-inlinetask-parser limit raw-secondary-p)) (t (let ((affiliated (org-ele= ment--collect-affiliated-keywords limit))) (cond ((and ... ...) (goto-char = ...) (org-element-keyword-parser limit nil)) ((looking-at org-element--late= x-begin-environment) (org-element-latex-environment-parser limit affiliated= )) ((looking-at org-drawer-regexp) (org-element-drawer-parser limit affilia= ted)) ((looking-at "[ =C2=A0 ]*:\\( \\|$\\)") (org-element-fixed-= width-parser limit affiliated)) ((looking-at "[ =C2=A0 =C2=A0 ]*#"= ;) (goto-char ...) (cond ... ... ... ... ... ...)) ((looking-at org-footnot= e-definition-re) (org-element-footnote-definition-parser limit affiliated))= ((looking-at "[ =C2=A0 ]*-\\{5,\\}[ =C2=A0 =C2=A0]*$") (org-elem= ent-horizontal-rule-parser limit affiliated)) ((looking-at "%%(")= (org-element-diary-sexp-parser limit affiliated)) ((looking-at "[ =C2= =A0]*\\(|\\|\\+\\(-+\\+\\)+[ =C2=A0 ]*$\\)") (org-element-table-parser= limit affiliated)) ((looking-at ...) (org-element-plain-list-parser limit = affiliated ...)) (t (org-element-paragraph-parser limit affiliated))))))))<= /div>
=C2=A0 org-element--current-element(98 element nil ((25 2 "-= " nil nil nil 30) (30 2 "- " nil nil nil 39) (39 2 "- = " nil nil nil 110) (53 4 "- " nil nil nil 72) (72 4 "- = " nil nil nil 110)))
=C2=A0 (setq element (org-element--curr= ent-element end (quote element) mode (org-element-property :structure paren= t)))
=C2=A0 (if element nil (setq element (org-element--current-e= lement end (quote element) mode (org-element-property :structure parent))) = (org-element-put-property element :parent parent) (org-element--cache-put e= lement))
=C2=A0 (while t (if syncp (progn (cond ((=3D (point) pos= ) (throw (quote exit) parent)) ((org-element--cache-interrupt-p time-limit)= (throw (quote interrupt) nil))))) (if element nil (setq element (org-eleme= nt--current-element end (quote element) mode (org-element-property :structu= re parent))) (org-element-put-property element :parent parent) (org-element= --cache-put element)) (let ((elem-end (org-element-property :end element)) = (type (org-element-type element))) (cond ((and (<=3D elem-end pos) (/=3D= (point-max) elem-end)) (goto-char elem-end) (setq mode (org-element--next-= mode type nil))) ((not (memq type org-element-greater-elements)) (throw (qu= ote exit) element)) ((let ((cbeg (org-element-property :contents-begin elem= ent)) (cend (org-element-property :contents-end element))) (if (or syncp (a= nd cbeg cend ... ...)) (progn (goto-char ...) (setq next nil mode ... paren= t element end cend))))) (t (throw (quote exit) element)))) (setq element ni= l))
=C2=A0 (let ((end (or (org-element-property :end element) (sa= ve-excursion (progn (defvar org-called-with-limited-levels) (defvar org-out= line-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* = (... ... ... ...) (outline-next-heading))) (point)))) (parent element)) (wh= ile t (if syncp (progn (cond ((=3D (point) pos) (throw (quote exit) parent)= ) ((org-element--cache-interrupt-p time-limit) (throw (quote interrupt) nil= ))))) (if element nil (setq element (org-element--current-element end (quot= e element) mode (org-element-property :structure parent))) (org-element-put= -property element :parent parent) (org-element--cache-put element)) (let ((= elem-end (org-element-property :end element)) (type (org-element-type eleme= nt))) (cond ((and (<=3D elem-end pos) (/=3D (point-max) elem-end)) (goto= -char elem-end) (setq mode (org-element--next-mode type nil))) ((not (memq = type org-element-greater-elements)) (throw (quote exit) element)) ((let ((c= beg ...) (cend ...)) (if (or syncp ...) (progn ... ...)))) (t (throw (quote= exit) element)))) (setq element nil)))
=C2=A0 (let* ((cached (an= d (org-element--cache-active-p) (org-element--cache-find pos nil))) (begin = (org-element-property :begin cached)) element next mode) (cond ((not cached= ) (if (progn (defvar org-called-with-limited-levels) (defvar org-outline-re= gexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-c= alled-with-limited-levels t) (org-outline-regexp ...) (outline-regexp org-o= utline-regexp) (org-outline-regexp-bol ...)) (outline-previous-heading))) (= progn (setq mode (quote planning)) (forward-line))) (skip-chars-forward &qu= ot;
=C2=A0 =C2=A0 \n") (beginning-of-line)) ((=3D pos begin)= (throw (quote exit) (if syncp (org-element-property :parent cached) cached= ))) ((re-search-backward (progn (defvar org-called-with-limited-levels) (de= fvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp= -bol) (let* ((org-called-with-limited-levels t) (org-outline-regexp ...) (o= utline-regexp org-outline-regexp) (org-outline-regexp-bol ...)) org-outline= -regexp-bol)) begin t) (forward-line) (skip-chars-forward "
= =C2=A0 =C2=A0 \n") (beginning-of-line) (setq mode (quote planning))) (= t (let ((up cached) (pos (if (=3D ... pos) (1- pos) pos))) (goto-char (or (= org-element-property :contents-begin cached) begin)) (while (let ((end ...)= ) (and (<=3D end pos) (goto-char end) (setq up ...)))) (cond ((not up)) = ((eobp) (setq element up)) (t (setq element up next (point))))))) (let ((en= d (or (org-element-property :end element) (save-excursion (progn (defvar or= g-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-r= egexp) (defvar org-outline-regexp-bol) (let* ... ...)) (point)))) (parent e= lement)) (while t (if syncp (progn (cond ((=3D ... pos) (throw ... parent))= ((org-element--cache-interrupt-p time-limit) (throw ... nil))))) (if eleme= nt nil (setq element (org-element--current-element end (quote element) mode= (org-element-property :structure parent))) (org-element-put-property eleme= nt :parent parent) (org-element--cache-put element)) (let ((elem-end (org-e= lement-property :end element)) (type (org-element-type element))) (cond ((a= nd (<=3D elem-end pos) (/=3D ... elem-end)) (goto-char elem-end) (setq m= ode (org-element--next-mode type nil))) ((not (memq type org-element-greate= r-elements)) (throw (quote exit) element)) ((let (... ...) (if ... ...))) (= t (throw (quote exit) element)))) (setq element nil))))
=C2=A0 (s= ave-restriction (widen) (goto-char pos) (let* ((cached (and (org-element--c= ache-active-p) (org-element--cache-find pos nil))) (begin (org-element-prop= erty :begin cached)) element next mode) (cond ((not cached) (if (progn (def= var org-called-with-limited-levels) (defvar org-outline-regexp) (defvar out= line-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) (outli= ne-previous-heading))) (progn (setq mode (quote planning)) (forward-line)))= (skip-chars-forward "
=C2=A0 =C2=A0 \n") (beginning-of= -line)) ((=3D pos begin) (throw (quote exit) (if syncp (org-element-propert= y :parent cached) cached))) ((re-search-backward (progn (defvar org-called-= with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (d= efvar org-outline-regexp-bol) (let* (... ... ... ...) org-outline-regexp-bo= l)) begin t) (forward-line) (skip-chars-forward "
=C2=A0 =C2= =A0 \n") (beginning-of-line) (setq mode (quote planning))) (t (let ((u= p cached) (pos (if ... ... pos))) (goto-char (or (org-element-property :con= tents-begin cached) begin)) (while (let (...) (and ... ... ...))) (cond ((n= ot up)) ((eobp) (setq element up)) (t (setq element up next ...)))))) (let = ((end (or (org-element-property :end element) (save-excursion (progn ... ..= . ... ... ...) (point)))) (parent element)) (while t (if syncp (progn (cond= (... ...) (... ...)))) (if element nil (setq element (org-element--current= -element end (quote element) mode (org-element-property :structure parent))= ) (org-element-put-property element :parent parent) (org-element--cache-put= element)) (let ((elem-end (org-element-property :end element)) (type (org-= element-type element))) (cond ((and ... ...) (goto-char elem-end) (setq mod= e ...)) ((not ...) (throw ... element)) ((let ... ...)) (t (throw ... eleme= nt)))) (setq element nil)))))
=C2=A0 (save-excursion (save-restri= ction (widen) (goto-char pos) (let* ((cached (and (org-element--cache-activ= e-p) (org-element--cache-find pos nil))) (begin (org-element-property :begi= n cached)) element next mode) (cond ((not cached) (if (progn (defvar org-ca= lled-with-limited-levels) (defvar org-outline-regexp) (defvar outline-regex= p) (defvar org-outline-regexp-bol) (let* ... ...)) (progn (setq mode ...) (= forward-line))) (skip-chars-forward "
=C2=A0 =C2=A0 \n"= ) (beginning-of-line)) ((=3D pos begin) (throw (quote exit) (if syncp (org-= element-property :parent cached) cached))) ((re-search-backward (progn (def= var org-called-with-limited-levels) (defvar org-outline-regexp) (defvar out= line-regexp) (defvar org-outline-regexp-bol) (let* ... org-outline-regexp-b= ol)) begin t) (forward-line) (skip-chars-forward "
=C2=A0 = =C2=A0 \n") (beginning-of-line) (setq mode (quote planning))) (t (let = ((up cached) (pos ...)) (goto-char (or ... begin)) (while (let ... ...)) (c= ond (...) (... ...) (t ...))))) (let ((end (or (org-element-property :end e= lement) (save-excursion ... ...))) (parent element)) (while t (if syncp (pr= ogn (cond ... ...))) (if element nil (setq element (org-element--current-el= ement end ... mode ...)) (org-element-put-property element :parent parent) = (org-element--cache-put element)) (let ((elem-end ...) (type ...)) (cond (.= .. ... ...) (... ...) (...) (t ...))) (setq element nil))))))
=C2= =A0 (catch (quote exit) (save-excursion (save-restriction (widen) (goto-cha= r pos) (let* ((cached (and (org-element--cache-active-p) (org-element--cach= e-find pos nil))) (begin (org-element-property :begin cached)) element next= mode) (cond ((not cached) (if (progn ... ... ... ... ...) (progn ... ...))= (skip-chars-forward "
=C2=A0 =C2=A0 \n") (beginning-of= -line)) ((=3D pos begin) (throw (quote exit) (if syncp ... cached))) ((re-s= earch-backward (progn ... ... ... ... ...) begin t) (forward-line) (skip-ch= ars-forward "
=C2=A0 =C2=A0 \n") (beginning-of-line) (s= etq mode (quote planning))) (t (let (... ...) (goto-char ...) (while ...) (= cond ... ... ...)))) (let ((end (or ... ...)) (parent element)) (while t (i= f syncp (progn ...)) (if element nil (setq element ...) (org-element-put-pr= operty element :parent parent) (org-element--cache-put element)) (let (... = ...) (cond ... ... ... ...)) (setq element nil)))))))
=C2=A0 org-= element--parse-to(77)
=C2=A0 (cond ((bobp) nil) ((progn (defvar o= rg-called-with-limited-levels) (defvar org-outline-regexp) (defvar outline-= regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limited-lev= els t) (org-outline-regexp (org-get-limited-outline-regexp)) (outline-regex= p org-outline-regexp) (org-outline-regexp-bol (concat "^" org-out= line-regexp))) (org-at-heading-p))) (beginning-of-line) (org-element-headli= ne-parser (point-max) t)) (t (if (org-element--cache-active-p) (progn (if (= not org-element--cache) (org-element-cache-reset) (org-element--cache-sync = (current-buffer) origin)))) (org-element--parse-to origin)))
=C2= =A0 (let ((origin (point))) (end-of-line) (skip-chars-backward "
=
=C2=A0 =C2=A0 \n") (cond ((bobp) nil) ((progn (defvar org-called-= with-limited-levels) (defvar org-outline-regexp) (defvar outline-regexp) (d= efvar org-outline-regexp-bol) (let* ((org-called-with-limited-levels t) (or= g-outline-regexp (org-get-limited-outline-regexp)) (outline-regexp org-outl= ine-regexp) (org-outline-regexp-bol (concat "^" org-outline-regex= p))) (org-at-heading-p))) (beginning-of-line) (org-element-headline-parser = (point-max) t)) (t (if (org-element--cache-active-p) (progn (if (not org-el= ement--cache) (org-element-cache-reset) (org-element--cache-sync (current-b= uffer) origin)))) (org-element--parse-to origin))))
=C2=A0 (save-= restriction (widen) (let ((origin (point))) (end-of-line) (skip-chars-backw= ard "
=C2=A0 =C2=A0 \n") (cond ((bobp) nil) ((progn (de= fvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar ou= tline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-limit= ed-levels t) (org-outline-regexp ...) (outline-regexp org-outline-regexp) (= org-outline-regexp-bol ...)) (org-at-heading-p))) (beginning-of-line) (org-= element-headline-parser (point-max) t)) (t (if (org-element--cache-active-p= ) (progn (if (not org-element--cache) (org-element-cache-reset) (org-elemen= t--cache-sync ... origin)))) (org-element--parse-to origin)))))
= =C2=A0 (save-excursion (save-restriction (widen) (let ((origin (point))) (e= nd-of-line) (skip-chars-backward "
=C2=A0 =C2=A0 \n") (= cond ((bobp) nil) ((progn (defvar org-called-with-limited-levels) (defvar o= rg-outline-regexp) (defvar outline-regexp) (defvar org-outline-regexp-bol) = (let* (... ... ... ...) (org-at-heading-p))) (beginning-of-line) (org-eleme= nt-headline-parser (point-max) t)) (t (if (org-element--cache-active-p) (pr= ogn (if ... ... ...))) (org-element--parse-to origin))))))
=C2=A0= org-element-at-point()
=C2=A0 (or element (org-element-at-point)= )
=C2=A0 (let* ((pos (point)) (element (or element (org-element-a= t-point))) (type (org-element-type element)) (post (org-element-property :p= ost-affiliated element))) (cond ((and post (< pos post)) (beginning-of-l= ine) (let ((case-fold-search t)) (looking-at org-element--affiliated-re)) (= cond ((not (member-ignore-case (match-string 1) org-element-parsed-keywords= )) (throw (quote objects-forbidden) element)) ((< (match-end 0) pos) (na= rrow-to-region (match-end 0) (line-end-position))) ((and (match-beginning 2= ) (>=3D pos (match-beginning 2)) (< pos (match-end 2))) (narrow-to-re= gion (match-beginning 2) (match-end 2))) (t (throw (quote objects-forbidden= ) element))) (setq type (quote keyword))) ((eq type (quote item)) (let ((ta= g (org-element-property :tag element))) (if (or (not tag) (/=3D (line-begin= ning-position) post)) (throw (quote objects-forbidden) element) (beginning-= of-line) (search-forward tag (line-end-position)) (goto-char (match-beginni= ng 0)) (if (and (>=3D pos ...) (< pos ...)) (narrow-to-region (point)= (match-end 0)) (throw (quote objects-forbidden) element))))) ((memq type (= quote (headline inlinetask))) (goto-char (org-element-property :begin eleme= nt)) (looking-at org-complex-heading-regexp) (let ((end (match-end 4))) (if= (not end) (throw (quote objects-forbidden) element) (goto-char (match-begi= nning 4)) (if (let (case-fold-search) (looking-at org-comment-string)) (pro= gn (goto-char ...))) (if (>=3D (point) end) (throw (quote objects-forbid= den) element) (narrow-to-region (point) end))))) ((memq type (quote (paragr= aph table-row verse-block))) (let ((cbeg (org-element-property :contents-be= gin element)) (cend (org-element-property :contents-end element))) (if (and= cbeg cend (>=3D pos cbeg) (or (< pos cend) (and ... ...))) (narrow-t= o-region cbeg cend) (throw (quote objects-forbidden) element)))) ((eq type = (quote planning)) (let ((--dolist-tail-- (quote (:closed :deadline :schedul= ed))) p) (while --dolist-tail-- (setq p (car --dolist-tail--)) (let ((times= tamp ...)) (if (and timestamp ... ...) (progn ...))) (setq --dolist-tail-- = (cdr --dolist-tail--)))) (throw (quote objects-forbidden) element)) (t (thr= ow (quote objects-forbidden) element))) (goto-char (point-min)) (let ((rest= riction (org-element-restriction type)) (parent element) (cache (cond ((not= (org-element--cache-active-p)) nil) (org-element--cache-objects (gethash e= lement org-element--cache-objects)) (t (org-element-cache-reset) nil))) nex= t object-data last) (prog1 (catch (quote exit) (while t (if next nil (let (= ...) (if data ... ...))) (catch (quote found) (if next (setq next ...) (let= ... ...)) (if next (progn ... ...) (setcar ... t))) (if (or (not next) (&g= t; ... pos)) (throw (quote exit) (or last parent)) (let (... ... ...) (cond= ... ... ...))))) (org-element--cache-put element cache))))
=C2= =A0 (save-restriction (widen) (let* ((pos (point)) (element (or element (or= g-element-at-point))) (type (org-element-type element)) (post (org-element-= property :post-affiliated element))) (cond ((and post (< pos post)) (beg= inning-of-line) (let ((case-fold-search t)) (looking-at org-element--affili= ated-re)) (cond ((not (member-ignore-case ... org-element-parsed-keywords))= (throw (quote objects-forbidden) element)) ((< (match-end 0) pos) (narr= ow-to-region (match-end 0) (line-end-position))) ((and (match-beginning 2) = (>=3D pos ...) (< pos ...)) (narrow-to-region (match-beginning 2) (ma= tch-end 2))) (t (throw (quote objects-forbidden) element))) (setq type (quo= te keyword))) ((eq type (quote item)) (let ((tag (org-element-property :tag= element))) (if (or (not tag) (/=3D ... post)) (throw (quote objects-forbid= den) element) (beginning-of-line) (search-forward tag (line-end-position)) = (goto-char (match-beginning 0)) (if (and ... ...) (narrow-to-region ... ...= ) (throw ... element))))) ((memq type (quote (headline inlinetask))) (goto-= char (org-element-property :begin element)) (looking-at org-complex-heading= -regexp) (let ((end (match-end 4))) (if (not end) (throw (quote objects-for= bidden) element) (goto-char (match-beginning 4)) (if (let ... ...) (progn .= ..)) (if (>=3D ... end) (throw ... element) (narrow-to-region ... end)))= )) ((memq type (quote (paragraph table-row verse-block))) (let ((cbeg (org-= element-property :contents-begin element)) (cend (org-element-property :con= tents-end element))) (if (and cbeg cend (>=3D pos cbeg) (or ... ...)) (n= arrow-to-region cbeg cend) (throw (quote objects-forbidden) element)))) ((e= q type (quote planning)) (let ((--dolist-tail-- (quote ...)) p) (while --do= list-tail-- (setq p (car --dolist-tail--)) (let (...) (if ... ...)) (setq -= -dolist-tail-- (cdr --dolist-tail--)))) (throw (quote objects-forbidden) el= ement)) (t (throw (quote objects-forbidden) element))) (goto-char (point-mi= n)) (let ((restriction (org-element-restriction type)) (parent element) (ca= che (cond ((not ...) nil) (org-element--cache-objects (gethash element org-= element--cache-objects)) (t (org-element-cache-reset) nil))) next object-da= ta last) (prog1 (catch (quote exit) (while t (if next nil (let ... ...)) (c= atch (quote found) (if next ... ...) (if next ... ...)) (if (or ... ...) (t= hrow ... ...) (let ... ...)))) (org-element--cache-put element cache)))))
=C2=A0 (save-excursion (save-restriction (widen) (let* ((pos (poin= t)) (element (or element (org-element-at-point))) (type (org-element-type e= lement)) (post (org-element-property :post-affiliated element))) (cond ((an= d post (< pos post)) (beginning-of-line) (let ((case-fold-search t)) (lo= oking-at org-element--affiliated-re)) (cond ((not ...) (throw ... element))= ((< ... pos) (narrow-to-region ... ...)) ((and ... ... ...) (narrow-to-= region ... ...)) (t (throw ... element))) (setq type (quote keyword))) ((eq= type (quote item)) (let ((tag ...)) (if (or ... ...) (throw ... element) (= beginning-of-line) (search-forward tag ...) (goto-char ...) (if ... ... ...= )))) ((memq type (quote (headline inlinetask))) (goto-char (org-element-pro= perty :begin element)) (looking-at org-complex-heading-regexp) (let ((end .= ..)) (if (not end) (throw ... element) (goto-char ...) (if ... ...) (if ...= ... ...)))) ((memq type (quote (paragraph table-row verse-block))) (let ((= cbeg ...) (cend ...)) (if (and cbeg cend ... ...) (narrow-to-region cbeg ce= nd) (throw ... element)))) ((eq type (quote planning)) (let ((--dolist-tail= -- ...) p) (while --dolist-tail-- (setq p ...) (let ... ...) (setq --dolist= -tail-- ...))) (throw (quote objects-forbidden) element)) (t (throw (quote = objects-forbidden) element))) (goto-char (point-min)) (let ((restriction (o= rg-element-restriction type)) (parent element) (cache (cond (... nil) (org-= element--cache-objects ...) (t ... nil))) next object-data last) (prog1 (ca= tch (quote exit) (while t (if next nil ...) (catch ... ... ...) (if ... ...= ...))) (org-element--cache-put element cache))))))
=C2=A0 (catch= (quote objects-forbidden) (save-excursion (save-restriction (widen) (let* = ((pos (point)) (element (or element (org-element-at-point))) (type (org-ele= ment-type element)) (post (org-element-property :post-affiliated element)))= (cond ((and post (< pos post)) (beginning-of-line) (let (...) (looking-= at org-element--affiliated-re)) (cond (... ...) (... ...) (... ...) (t ...)= ) (setq type (quote keyword))) ((eq type (quote item)) (let (...) (if ... .= .. ... ... ... ...))) ((memq type (quote ...)) (goto-char (org-element-prop= erty :begin element)) (looking-at org-complex-heading-regexp) (let (...) (i= f ... ... ... ... ...))) ((memq type (quote ...)) (let (... ...) (if ... ..= . ...))) ((eq type (quote planning)) (let (... p) (while --dolist-tail-- ..= . ... ...)) (throw (quote objects-forbidden) element)) (t (throw (quote obj= ects-forbidden) element))) (goto-char (point-min)) (let ((restriction (org-= element-restriction type)) (parent element) (cache (cond ... ... ...)) next= object-data last) (prog1 (catch (quote exit) (while t ... ... ...)) (org-e= lement--cache-put element cache)))))))
=C2=A0 org-element-context= ()
=C2=A0 org-babel-exp-process-buffer(#<buffer org-bug.org<2><2>>)
=C2=A0 or= g-export-execute-babel-code()
=C2=A0 org-export-as(html nil nil n= il (:output-file "./org-bug.html"))
=C2=A0 org-export-t= o-file(html "./org-bug.html" nil nil nil nil nil)
=C2= =A0 org-html-export-to-html(nil nil nil nil)
=C2=A0 org-export-di= spatch(nil)
=C2=A0 funcall-interactively(org-export-dispatch nil)=
=C2=A0 #<subr call-interactively>(org-export-dispatch nil = nil)
=C2=A0 ad-Advice-call-interactively(#<subr call-interacti= vely> org-export-dispatch nil nil)
=C2=A0 apply(ad-Advice-call= -interactively #<subr call-interactively> (org-export-dispatch nil ni= l))
=C2=A0 call-interactively(org-export-dispatch nil nil)
<= div>=C2=A0 command-execute(org-export-dispatch)


Thanks!
Shlomi


Emacs =C2=A0: GNU Emacs 25.0.50.1 (x86_64-apple-darwin13.= 4.0, NS appkit-1265.21 Version 10.9.5 (Build 13F1112))
=C2=A0of 2= 015-11-10
Package: Org-mode version 8.3.4 (8.3.4-9-gfda14f-elpa @= /Users/vaknins9/.emacs.d/elpa/org-20160307/)

curr= ent state:
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
(= setq
=C2=A0org-src-lang-modes '(("browser" . html) = ("ocaml" . tuareg) ("elisp" . emacs-lisp) ("ditaa&= quot; . artist) ("asymptote" . asy)
=C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("dot"= ; . fundamental) ("sqlite" . sql) ("calc" . fundamental= ) ("C" . c) ("cpp" . c++) ("C++" . c++)
=
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 ("screen" . shell-script) ("shell" . sh) ("= bash" . sh))
=C2=A0org-tab-first-hook '(org-hide-block-t= oggle-maybe org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)=
=C2=A0org-latex-classes '(("beamer" "\\docume= ntclass[presentation]{beamer}" ("\\section{%s}" . "\\se= ction*{%s}")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("\\subsection{%s}" . "\\sub= section*{%s}") ("\\subsubsection{%s}" . "\\subsubsectio= n*{%s}"))
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0("article" "\\documentclass[11pt]= {article}" ("\\section{%s}" . "\\section*{%s}")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 ("\\subsection{%s}" . "\\subsection*{%s}") (= "\\subsubsection{%s}" . "\\subsubsection*{%s}")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 ("\\paragraph{%s}" . "\\paragraph*{%s}") ("= \\subparagraph{%s}" . "\\subparagraph*{%s}"))
=C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0(&= quot;report" "\\documentclass[11pt]{report}" ("\\part{%= s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\ch= apter*{%s}")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("\\section{%s}" . "\\sectio= n*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}"= )
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 ("\\subsubsection{%s}" . "\\subsubsection*{%s}= "))
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0("book" "\\documentclass[11pt]{book}&quo= t; ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}&= quot; . "\\chapter*{%s}")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("\\section{%s}"= . "\\section*{%s}") ("\\subsection{%s}" . "\\subs= ection*{%s}")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("\\subsubsection{%s}" . "\\= subsubsection*{%s}"))
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0)
=C2=A0org-reveal-slide-nu= mber "c"
=C2=A0org-speed-command-hook '(org-speed-c= ommand-default-hook org-babel-speed-command-hook)
=C2=A0org-time-= clocksum-format '(:work-days "%dd " :hours "%d" :re= quire-hours t :minutes ":%02d" :require-minutes t)
=C2= =A0org-occur-hook '(org-first-headline-recenter)
=C2=A0org-me= taup-hook '(org-babel-load-in-session-maybe)
=C2=A0org-html-f= ormat-drawer-function '(lambda (name contents) contents)
=C2= =A0org-log-done 'time
=C2=A0org-latex-format-inlinetask-funct= ion 'org-latex-format-inlinetask-default-function
=C2=A0org-c= onfirm-shell-link-function 'yes-or-no-p
=C2=A0org-image-actua= l-width 100
=C2=A0org-ascii-format-inlinetask-function 'org-a= scii-format-inlinetask-default
=C2=A0org-latex-pdf-process '(= "pdflatex -shell-escape -interaction nonstopmode -output-directory %o = %f"
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0"pdflatex -shell-escape -interaction= nonstopmode -output-directory %o %f"
=C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0"= pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f&quo= t;)
=C2=A0org-agenda-custom-commands '(("r" tags-to= do "ri") ("T" tags-todo "tali"))
= =C2=A0org-latex-format-headline-function 'org-latex-format-headline-def= ault-function
=C2=A0org-after-todo-state-change-hook '(org-cl= ock-out-if-current)
=C2=A0org-latex-format-drawer-function '(= lambda (name contents) contents)
=C2=A0org-from-is-user-regexp &q= uot;\\<Shlomi Vaknin\\>"
=C2=A0org-src-mode-hook '= (org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
=C2=A0org-agenda-before-write-hook '(org-agenda-add-entry-text)=
=C2=A0org-babel-pre-tangle-hook '(save-buffer)
=C2= =A0org-mode-hook '(org-mode-reftex-setup (lambda nil (org-bullets-mode = 1)) er/add-org-mode-expansions
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0= =C2=A0 =C2=A0 =C2=A0 =C2=A0#[nil "\300\301\302\303\304$\207" [or= g-add-hook change-major-mode-hook org-show-block-all append local] 5]
=
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0#[nil &q= uot;\300\301\302\303\304$\207" [org-add-hook change-major-mode-hook or= g-babel-show-result-all append local] 5]
=C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0org-babel-result-hide-spec org-babel-= hide-all-hashes #[nil "\300\301!\207" [run-hooks prelude-org-mode= -hook] 2])
=C2=A0org-export-coding-system 'utf-8
= =C2=A0org-archive-hook '(org-attach-archive-delete-maybe)
=C2= =A0org-ascii-format-drawer-function '(lambda (name contents width) cont= ents)
=C2=A0org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point = org-babel-execute-safely-maybe)
=C2=A0org-cycle-hook '(org-cy= cle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-line= s
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = org-optimize-window-after-visibility-change)
=C2=A0org-ditaa-eps-= jar-path "/Users/vaknins9/.emacs.d/elpa/contrib/scripts/DitaaEps.jar&q= uot;
=C2=A0org-link-abbrev-alist '(("papers" . &quo= t;~/papers/%s.pdf"))
=C2=A0org-latex-packages-alist '((&= quot;" "minted" nil))
=C2=A0org-babel-tangle-lang-= exts '(("D" . "d") ("C++" . "cpp&quo= t;) ("python" . "py") ("clojure" . "clj&= quot;) ("emacs-lisp" . "el")
=C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 ("elisp" . "el"))
=C2=A0org= -confirm-elisp-link-function 'yes-or-no-p
=C2=A0org-html-html= ize-output-type 'css
=C2=A0org-metadown-hook '(org-babel-= pop-to-session-maybe)
=C2=A0org-babel-after-execute-hook '(or= g-redisplay-inline-images)
=C2=A0org-latex-listings 'minted
=C2=A0org-ditaa-jar-path "~/org-mode/org-8.2.7c/contrib/scrip= ts/ditaa.jar"
=C2=A0org-html-format-headline-function 'o= rg-html-format-headline-default-function
=C2=A0org-structure-temp= late-alist '(("f" "#+BEGIN_info\n?\n#+END_info" &qu= ot;<div class=3D\"info\">\n\n</div>")
= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("n" "#+BEGIN_note\n?= \n#+END_note" "<div class=3D\"note\">\n\n</div= >")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("w" = "#+BEGIN_warning\n?\n#+END_warning" "<div class=3D\"= warning\">\n\n</div>")
=C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 ("t" "#+BEGIN_TIP\n?\n#+END_TIP" &quo= t;<div class=3D\"tip\">\n\n</div>")
= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("sho" "#+BEGIN_SRC s= h :exports code :result none\n?\n#+END_SRC" "<src lang=3D\&quo= t;?\">\n\n</src>")
=C2=A0 =C2=A0 =C2=A0 =C2=A0= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 ("cljo" "#+BEGIN_SRC clojure :exports code :resul= t none\n?\n#+END_SRC"
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0"<src lang=3D\"?\">\n\n</src>")
=
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("clj" "#+BEGIN_SR= C clojure ?\n\n#+END_SRC" "<src lang=3D\"?\">\n\n= </src>")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("n= " "#+BEGIN_NOTES\n?\n#+END_NOTES") ("s" "#+BE= GIN_SRC ?\n\n#+END_SRC")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 ("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE") ("q&= quot; "#+BEGIN_QUOTE\n?\n#+END_QUOTE")
=C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 ("v" "#+BEGIN_VERSE\n?\n#+END_VERSE= ") ("V" "#+BEGIN_VERBATIM\n?\n#+END_VERBATIM")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 ("c" "#+BEGIN_= CENTER\n?\n#+END_CENTER") ("l" "#+BEGIN_LaTeX\n?\n#+END= _LaTeX") ("L" "#+LaTeX: ")
=C2=A0 =C2=A0= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 ("h" "#+BEGIN_HTML\n?\n#+END_HTML&q= uot;) ("H" "#+HTML: ") ("a" "#+BEGIN_ASC= II\n?\n#+END_ASCII")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 (= "A" "#+ASCII: ") ("i" "#+INDEX: ?")= ("I" "#+INCLUDE: %file ?"))
=C2=A0org-mime-h= tml-hook '(inline-css)
=C2=A0org-babel-load-languages '((= ditaa . t) (python . t) (C . t) (clojure . t) (emacs-lisp . t) (clojure . t= ) (sh . t) (gnuplot . t))
=C2=A0org-html-format-inlinetask-functi= on 'org-html-format-inlinetask-default-function
=C2=A0org-age= nda-files '("~/org/work-au= gust-2015.org" "~/org/home.org" "~/org/notes.org")
=
=C2=A0org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
=C2=A0org-confirm-babel-evaluate nil
=C2=A0org-publish-pr= oject-alist '(("default" :base-directory "/Users/vaknins= 9/projects/blog/org//" :base-extension "org"
=C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 :publishing-directory "/Users/vaknins9/pro= jects/blog//" :publishing-function
=C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 org-html-publish-to-html :headline-levels 4 :section-numbers nil :wi= th-toc nil :html-head
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 "<li= nk rel=3D\"stylesheet\" href=3D\"./css/style.css\" type= =3D\"text/css\"/>" :html-preamble t :recursive
= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 t :make-index t :html-extension "html&= quot; :body-only t)
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0("post"= ; :base-directory "/Users/vaknins9/projects/blog/org//" :base-ext= ension "org"
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 :publishing-= directory "/Users/vaknins9/projects/blog//_posts/" :publishing-fu= nction
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 org-html-publish-to-html := headline-levels 4 :section-numbers nil :with-toc nil :html-head
= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 "<link rel=3D\"stylesheet\&quo= t; href=3D\"./css/style.css\" type=3D\"text/css\"/>&= quot; :html-preamble t :recursive
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 t= :make-index t :html-extension "html" :body-only t)
=C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0("images" :base-directory "/Users= /vaknins9/projects/blog/org//img" :base-extension "jpg\\|gif\\|pn= g"
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 :publishing-directory &quo= t;/Users/vaknins9/projects/blog//img" :publishing-function
= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 org-publish-attachment :recursive t)
<= div>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0("js" :base-directory "/Us= ers/vaknins9/projects/blog/org//js" :base-extension "js"
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 :publishing-directory "/Users/v= aknins9/projects/blog//js" :publishing-function
=C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 org-publish-attachment :recursive t)
=C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0("css" :base-directory "/Users/vakni= ns9/projects/blog/org//css" :base-extension "css\\|el"
=
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 :publishing-directory "/Users/vakni= ns9/projects/blog//css" :publishing-function
=C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 org-publish-attachment :recursive t)
=C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0("web" :components ("images" "= js" "css")))
=C2=A0)

--001a113a7e7c277203052d93c26e--