In 22, latest git:
downcase: Args out of range: "image-keep-calm", 651500, 651505
match-string(1 "image-keep-calm")
(downcase (match-string 1 val))
(concat ":macro-" (downcase (match-string 1 val)))
(intern (concat ":macro-" (downcase ...)))
(plist-put nil (intern (concat ":macro-" ...)) (match-string 2 val))
(cond ((string= key "SETUP_FILE") (let ... ...)) ((string= key
"OPTIONS") (org-export-parse-option-keyword val backend)) ((string=
key "MACRO") (string-match "^\\([-a-zA-Z0-9_]+\\)[ ]+\\(.*?[ ]*$\\)"
val) (plist-put nil ... ...)))
(org-combine-plists (cond (... ...) (... ...) (... ... ...)) plist)
(setq plist (org-combine-plists (cond ... ... ...) plist))
(let ((key ...) (val ...)) (setq plist (org-combine-plists ... plist)))
(while (string-match special-re buffer-string start) (setq start
(match-end 0)) (let (... ...) (setq plist ...)))
(let ((start 0) (special-re ...)) (while (string-match special-re
buffer-string start) (setq start ...) (let ... ...)))
(let ((case-fold-search t) plist) (let (... ...) (while ... ...
...)) (let* (... ... ... ...) (while ... ... ...) (mapc ...
org-element-parsed-keywords)) plist)
org-export-get-inbuffer-options(#("#-*- coding: utf-8 -*-
...
--
The Kafka Pandemic: http://thekafkapandemic.blogspot.com
===
Bigotry against people with serious diseases is still bigotry.