Org now failing on HTML export

[Peter Davis <pfd@pfdstudio.com>]

I've been using org 9.0.7/GNU Emacs 25.1.1 on Mac OS X for a while, and successfully exporting HTML to copy and paste into my blog.
However, in the last day or so, this started failing. I'm unaware of having changed anything in my configuration.

The error is ...

Here's the entire file I'm using ...

+============
Does this work at all?
+============

Here's the debug traceback ...

+============
Debugger entered--Lisp error: (wrong-type-argument listp #("org test" 0 8 (:parent (#1))))
  org-element-set-contents(#("org test" 0 8 (:parent (#0))))
  apply(org-element-set-contents #("org test" 0 8 (:parent (#0))) nil)
  #[257 "\211\305\306\307#\x19\310\311\b\211:\204\0\312\202\"\n@9\203!\nAA\202\"\n)\"\210\313\314	\b\211:\2043\312\202@\n@9\203?\nAA\202@\n)#\210\b\315\211	^[\n;\203V\316\317\v\n#\202\\\320\nA@\v\"*^[\211;\203n\321\n\312\v\f$\202z\nA\322\nA@\v\f#\240\210\n+\210	A\bA@\240\210	\b@\240*\207" [new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\b\305	^[\211;\203\0\306\f\307\v\n$\202 \fA\310\fA@\v\n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 7 "\n\n(fn S)"](#("org test" 0 8 (:parent (#0))))
  #[257 "\211\211:\204\0\211;\205\0\311\262\202\0\211@9\205\0\211@\262\x01?\206\251\301\203-\x01\312\301\313\">\206\251\211\2049\314\310\242\"\202\251\211\315=\203]\314\310\242\211:\204N\316\262\202Y\211@9\203Y\211AA\262\"\202\251\211\304>\203~\300!\211\203}\302\203v\317\320\"\210\202}\307\307\242B\240\210\210\306\321=\203\271\x01;\204\271\211\x1a\236A\211\203\270\211@\310\242\x05\211;\203\247\322\323\x03#\266\202\202\257\312A@\"\266\202!\210A\266\202\202\216\210\303\203Q\306\321=\203Q\324!\325=\203Q\x0e\211\203P\211@\211@A\211;\203\347\322\323\x03#\266\202\202\357\312A@\"\266\202\211\203G\x01\x1c\235\2030\x01\x1d\235\203!\326!\211\203\x01\211@\310\242A!\210\310\242@!\210A\266\202\202\x01\210\202G\310\242A!\210\310\242@!\210\202G\x01\x1d\235\203B\314\310\242\326!\"\210\202G\310\242!\210\266\x01A\266\202\202\315\210\211\305>\206\251\x01\211:\204c\316\262\202n\211@9\203n\211AA\262?\206\251\306\327=\203\200\211\x1e>?\206\251\306\330=\203\216\324!\331=\206\251\314\310\242\211:\204\235\316\262\202\250\211@9\203\250\211AA\262\"\207" [#[257 "\211\305\306\307#\x19\310\311\b\211:\204\0\312\202\"\n@9\203!\nAA\202\"\n)\"\210\313\314	\b\211:\2043\312\202@\n@9\203?\nAA\202@\n)#\210\b\315\211	^[\n;\203V\316\317\v\n#\202\\\320\nA@\v\"*^[\211;\203n\321\n\312\v\f$\202z\nA\322\nA@\v\f#\240\210\n+\210	A\bA@\240\210	\b@\240*\207" [new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\b\305	^[\211;\203\0\306\f\307\v\n$\202 \fA\310\fA@\v\n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 7 "\n\n(fn S)"] nil nil nil (plain-text) nil objects (nil) (#0) plain-text plist-get :ignore-list mapc org-data nil throw :--map-first-match objects get-text-property 0 org-element-class element reverse greater-elements elements object org-element-secondary-value-alist org-element--parsed-properties-alist org-element-dual-keywords org-element-multiple-keywords org-element-greater-elements] 11 "\n\n(fn --DATA)"](#("org test" 0 8 (:parent (#0))))
  mapc(#[257 "\211\211:\204\0\211;\205\0\311\262\202\0\211@9\205\0\211@\262\x01?\206\251\301\203-\x01\312\301\313\">\206\251\211\2049\314\310\242\"\202\251\211\315=\203]\314\310\242\211:\204N\316\262\202Y\211@9\203Y\211AA\262\"\202\251\211\304>\203~\300!\211\203}\302\203v\317\320\"\210\202}\307\307\242B\240\210\210\306\321=\203\271\x01;\204\271\211\x1a\236A\211\203\270\211@\310\242\x05\211;\203\247\322\323\x03#\266\202\202\257\312A@\"\266\202!\210A\266\202\202\216\210\303\203Q\306\321=\203Q\324!\325=\203Q\x0e\211\203P\211@\211@A\211;\203\347\322\323\x03#\266\202\202\357\312A@\"\266\202\211\203G\x01\x1c\235\2030\x01\x1d\235\203!\326!\211\203\x01\211@\310\242A!\210\310\242@!\210A\266\202\202\x01\210\202G\310\242A!\210\310\242@!\210\202G\x01\x1d\235\203B\314\310\242\326!\"\210\202G\310\242!\210\266\x01A\266\202\202\315\210\211\305>\206\251\x01\211:\204c\316\262\202n\211@9\203n\211AA\262?\206\251\306\327=\203\200\211\x1e>?\206\251\306\330=\203\216\324!\331=\206\251\314\310\242\211:\204\235\316\262\202\250\211@9\203\250\211AA\262\"\207" [#[257 "\211\305\306\307#\x19\310\311\b\211:\204\0\312\202\"\n@9\203!\nAA\202\"\n)\"\210\313\314	\b\211:\2043\312\202@\n@9\203?\nAA\202@\n)#\210\b\315\211	^[\n;\203V\316\317\v\n#\202\\\320\nA@\v\"*^[\211;\203n\321\n\312\v\f$\202z\nA\322\nA@\v\f#\240\210\n+\210	A\bA@\240\210	\b@\240*\207" [new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\b\305	^[\211;\203\0\306\f\307\v\n$\202 \fA\310\fA@\v\n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 7 "\n\n(fn S)"] nil nil nil (plain-text) nil objects (nil) (#0) plain-text plist-get :ignore-list mapc org-data nil throw :--map-first-match objects get-text-property 0 org-element-class element reverse greater-elements elements object org-element-secondary-value-alist org-element--parsed-properties-alist org-element-dual-keywords org-element-multiple-keywords org-element-greater-elements] 11 "\n\n(fn --DATA)"] (#("org test" 0 8 (:parent #0))))
  #[257 "\211\211:\204\0\211;\205\0\311\262\202\0\211@9\205\0\211@\262\x01?\206\251\301\203-\x01\312\301\313\">\206\251\211\2049\314\310\242\"\202\251\211\315=\203]\314\310\242\211:\204N\316\262\202Y\211@9\203Y\211AA\262\"\202\251\211\304>\203~\300!\211\203}\302\203v\317\320\"\210\202}\307\307\242B\240\210\210\306\321=\203\271\x01;\204\271\211\x1a\236A\211\203\270\211@\310\242\x05\211;\203\247\322\323\x03#\266\202\202\257\312A@\"\266\202!\210A\266\202\202\216\210\303\203Q\306\321=\203Q\324!\325=\203Q\x0e\211\203P\211@\211@A\211;\203\347\322\323\x03#\266\202\202\357\312A@\"\266\202\211\203G\x01\x1c\235\2030\x01\x1d\235\203!\326!\211\203\x01\211@\310\242A!\210\310\242@!\210A\266\202\202\x01\210\202G\310\242A!\210\310\242@!\210\202G\x01\x1d\235\203B\314\310\242\326!\"\210\202G\310\242!\210\266\x01A\266\202\202\315\210\211\305>\206\251\x01\211:\204c\316\262\202n\211@9\203n\211AA\262?\206\251\306\327=\203\200\211\x1e>?\206\251\306\330=\203\216\324!\331=\206\251\314\310\242\211:\204\235\316\262\202\250\211@9\203\250\211AA\262\"\207" [#[257 "\211\305\306\307#\x19\310\311\b\211:\204\0\312\202\"\n@9\203!\nAA\202\"\n)\"\210\313\314	\b\211:\2043\312\202@\n@9\203?\nAA\202@\n)#\210\b\315\211	^[\n;\203V\316\317\v\n#\202\\\320\nA@\v\"*^[\211;\203n\321\n\312\v\f$\202z\nA\322\nA@\v\f#\240\210\n+\210	A\bA@\240\210	\b@\240*\207" [new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\b\305	^[\211;\203\0\306\f\307\v\n$\202 \fA\310\fA@\v\n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 7 "\n\n(fn S)"] nil nil nil (plain-text) nil objects (nil) (#0) plain-text plist-get :ignore-list mapc org-data nil throw :--map-first-match objects get-text-property 0 org-element-class element reverse greater-elements elements object org-element-secondary-value-alist org-element--parsed-properties-alist org-element-dual-keywords org-element-multiple-keywords org-element-greater-elements] 11 "\n\n(fn --DATA)"]((#("org test" 0 8 (:parent #0))))
  org-element-map((#("org test" 0 8 (:parent #0))) plain-text #[257 "\211\305\306\307#\x19\310\311\b\211:\204\0\312\202\"\n@9\203!\nAA\202\"\n)\"\210\313\314	\b\211:\2043\312\202@\n@9\203?\nAA\202@\n)#\210\b\315\211	^[\n;\203V\316\317\v\n#\202\\\320\nA@\v\"*^[\211;\203n\321\n\312\v\f$\202z\nA\322\nA@\v\f#\240\210\n+\210	A\bA@\240\210	\b@\240*\207" [new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\b\305	^[\211;\203\0\306\f\307\v\n$\202 \fA\310\fA@\v\n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 7 "\n\n(fn S)"])
  org-export--get-inbuffer-options([cl-struct-org-export-backend html nil ((bold . org-html-bold) (center-block . org-html-center-block) (clock . org-html-clock) (code . org-html-code) (drawer . org-html-drawer) (dynamic-block . org-html-dynamic-block) (entity . org-html-entity) (example-block . org-html-example-block) (export-block . org-html-export-block) (export-snippet . org-html-export-snippet) (fixed-width . org-html-fixed-width) (footnote-definition . org-html-footnote-definition) (footnote-reference . org-html-footnote-reference) (headline . org-html-headline) (horizontal-rule . org-html-horizontal-rule) (inline-src-block . org-html-inline-src-block) (inlinetask . org-html-inlinetask) (inner-template . org-html-inner-template) (italic . org-html-italic) (item . org-html-item) (keyword . org-html-keyword) (latex-environment . org-html-latex-environment) (latex-fragment . org-html-latex-fragment) (line-break . org-html-line-break) (link . org-html-link) (node-property . org-html-node-property) (paragraph . org-html-paragraph) (plain-list . org-html-plain-list) (plain-text . org-html-plain-text) (planning . org-html-planning) (property-drawer . org-html-property-drawer) (quote-block . org-html-quote-block) (radio-target . org-html-radio-target) (section . org-html-section) (special-block . org-html-special-block) (src-block . org-html-src-block) (statistics-cookie . org-html-statistics-cookie) (strike-through . org-html-strike-through) (subscript . org-html-subscript) (superscript . org-html-superscript) (table . org-html-table) (table-cell . org-html-table-cell) (table-row . org-html-table-row) (target . org-html-target) (template . org-html-template) (timestamp . org-html-timestamp) (underline . org-html-underline) (verbatim . org-html-verbatim) (verse-block . org-html-verse-block)) ((:html-doctype "HTML_DOCTYPE" nil org-html-doctype) (:html-container "HTML_CONTAINER" nil org-html-container-element) (:description "DESCRIPTION" nil nil newline) (:keywords "KEYWORDS" nil nil space) (:html-html5-fancy nil "html5-fancy" org-html-html5-fancy) (:html-link-use-abs-url nil "html-link-use-abs-url" org-html-link-use-abs-url) (:html-link-home "HTML_LINK_HOME" nil org-html-link-home) (:html-link-up "HTML_LINK_UP" nil org-html-link-up) (:html-mathjax "HTML_MATHJAX" nil "" space) (:html-postamble nil "html-postamble" org-html-postamble) (:html-preamble nil "html-preamble" org-html-preamble) (:html-head "HTML_HEAD" nil org-html-head newline) (:html-head-extra "HTML_HEAD_EXTRA" nil org-html-head-extra newline) (:subtitle "SUBTITLE" nil nil parse) (:html-head-include-default-style nil "html-style" org-html-head-include-default-style) (:html-head-include-scripts nil "html-scripts" org-html-head-include-scripts) (:html-allow-name-attribute-in-anchors nil nil org-html-allow-name-attribute-in-anchors) (:html-divs nil nil org-html-divs) (:html-checkbox-type nil nil org-html-checkbox-type) (:html-extension nil nil org-html-extension) (:html-footnote-format nil nil org-html-footnote-format) (:html-footnote-separator nil nil org-html-footnote-separator) (:html-footnotes-section nil nil org-html-footnotes-section) (:html-format-drawer-function nil nil org-html-format-drawer-function) (:html-format-headline-function nil nil org-html-format-headline-function) (:html-format-inlinetask-function nil nil org-html-format-inlinetask-function) (:html-home/up-format nil nil org-html-home/up-format) (:html-indent nil nil org-html-indent) (:html-infojs-options nil nil org-html-infojs-options) (:html-infojs-template nil nil org-html-infojs-template) (:html-inline-image-rules nil nil org-html-inline-image-rules) (:html-link-org-files-as-html nil nil org-html-link-org-files-as-html) (:html-mathjax-options nil nil org-html-mathjax-options) (:html-mathjax-template nil nil org-html-mathjax-template) (:html-metadata-timestamp-format nil nil org-html-metadata-timestamp-format) (:html-postamble-format nil nil org-html-postamble-format) (:html-preamble-format nil nil org-html-preamble-format) (:html-table-align-individual-fields nil nil org-html-table-align-individual-fields) (:html-table-caption-above nil nil org-html-table-caption-above) (:html-table-data-tags nil nil org-html-table-data-tags) (:html-table-header-tags nil nil org-html-table-header-tags) (:html-table-use-header-tags-for-first-column nil nil org-html-table-use-header-tags-for-first-column) (:html-tag-class-prefix nil nil org-html-tag-class-prefix) (:html-text-markup-alist nil nil org-html-text-markup-alist) (:html-todo-kwd-class-prefix nil nil org-html-todo-kwd-class-prefix) (:html-toplevel-hlevel nil nil org-html-toplevel-hlevel) (:html-use-infojs nil nil org-html-use-infojs) (:html-validation-link nil nil org-html-validation-link) (:html-viewport nil nil org-html-viewport) (:html-inline-images nil nil org-html-inline-images) ...) ((:filter-options . org-html-infojs-install-script) (:filter-final-output . org-html-final-function)) nil (104 "Export to HTML" ((72 "As HTML buffer" org-html-export-as-html) (104 "As HTML file" org-html-export-to-html) (111 "As HTML file and open" (lambda (a s v b) (if a (org-html-export-to-html t s v b) (org-open-file (org-html-export-to-html nil s v b)))))))])
  org-export-get-environment([cl-struct-org-export-backend html nil ((bold . org-html-bold) (center-block . org-html-center-block) (clock . org-html-clock) (code . org-html-code) (drawer . org-html-drawer) (dynamic-block . org-html-dynamic-block) (entity . org-html-entity) (example-block . org-html-example-block) (export-block . org-html-export-block) (export-snippet . org-html-export-snippet) (fixed-width . org-html-fixed-width) (footnote-definition . org-html-footnote-definition) (footnote-reference . org-html-footnote-reference) (headline . org-html-headline) (horizontal-rule . org-html-horizontal-rule) (inline-src-block . org-html-inline-src-block) (inlinetask . org-html-inlinetask) (inner-template . org-html-inner-template) (italic . org-html-italic) (item . org-html-item) (keyword . org-html-keyword) (latex-environment . org-html-latex-environment) (latex-fragment . org-html-latex-fragment) (line-break . org-html-line-break) (link . org-html-link) (node-property . org-html-node-property) (paragraph . org-html-paragraph) (plain-list . org-html-plain-list) (plain-text . org-html-plain-text) (planning . org-html-planning) (property-drawer . org-html-property-drawer) (quote-block . org-html-quote-block) (radio-target . org-html-radio-target) (section . org-html-section) (special-block . org-html-special-block) (src-block . org-html-src-block) (statistics-cookie . org-html-statistics-cookie) (strike-through . org-html-strike-through) (subscript . org-html-subscript) (superscript . org-html-superscript) (table . org-html-table) (table-cell . org-html-table-cell) (table-row . org-html-table-row) (target . org-html-target) (template . org-html-template) (timestamp . org-html-timestamp) (underline . org-html-underline) (verbatim . org-html-verbatim) (verse-block . org-html-verse-block)) ((:html-doctype "HTML_DOCTYPE" nil org-html-doctype) (:html-container "HTML_CONTAINER" nil org-html-container-element) (:description "DESCRIPTION" nil nil newline) (:keywords "KEYWORDS" nil nil space) (:html-html5-fancy nil "html5-fancy" org-html-html5-fancy) (:html-link-use-abs-url nil "html-link-use-abs-url" org-html-link-use-abs-url) (:html-link-home "HTML_LINK_HOME" nil org-html-link-home) (:html-link-up "HTML_LINK_UP" nil org-html-link-up) (:html-mathjax "HTML_MATHJAX" nil "" space) (:html-postamble nil "html-postamble" org-html-postamble) (:html-preamble nil "html-preamble" org-html-preamble) (:html-head "HTML_HEAD" nil org-html-head newline) (:html-head-extra "HTML_HEAD_EXTRA" nil org-html-head-extra newline) (:subtitle "SUBTITLE" nil nil parse) (:html-head-include-default-style nil "html-style" org-html-head-include-default-style) (:html-head-include-scripts nil "html-scripts" org-html-head-include-scripts) (:html-allow-name-attribute-in-anchors nil nil org-html-allow-name-attribute-in-anchors) (:html-divs nil nil org-html-divs) (:html-checkbox-type nil nil org-html-checkbox-type) (:html-extension nil nil org-html-extension) (:html-footnote-format nil nil org-html-footnote-format) (:html-footnote-separator nil nil org-html-footnote-separator) (:html-footnotes-section nil nil org-html-footnotes-section) (:html-format-drawer-function nil nil org-html-format-drawer-function) (:html-format-headline-function nil nil org-html-format-headline-function) (:html-format-inlinetask-function nil nil org-html-format-inlinetask-function) (:html-home/up-format nil nil org-html-home/up-format) (:html-indent nil nil org-html-indent) (:html-infojs-options nil nil org-html-infojs-options) (:html-infojs-template nil nil org-html-infojs-template) (:html-inline-image-rules nil nil org-html-inline-image-rules) (:html-link-org-files-as-html nil nil org-html-link-org-files-as-html) (:html-mathjax-options nil nil org-html-mathjax-options) (:html-mathjax-template nil nil org-html-mathjax-template) (:html-metadata-timestamp-format nil nil org-html-metadata-timestamp-format) (:html-postamble-format nil nil org-html-postamble-format) (:html-preamble-format nil nil org-html-preamble-format) (:html-table-align-individual-fields nil nil org-html-table-align-individual-fields) (:html-table-caption-above nil nil org-html-table-caption-above) (:html-table-data-tags nil nil org-html-table-data-tags) (:html-table-header-tags nil nil org-html-table-header-tags) (:html-table-use-header-tags-for-first-column nil nil org-html-table-use-header-tags-for-first-column) (:html-tag-class-prefix nil nil org-html-tag-class-prefix) (:html-text-markup-alist nil nil org-html-text-markup-alist) (:html-todo-kwd-class-prefix nil nil org-html-todo-kwd-class-prefix) (:html-toplevel-hlevel nil nil org-html-toplevel-hlevel) (:html-use-infojs nil nil org-html-use-infojs) (:html-validation-link nil nil org-html-validation-link) (:html-viewport nil nil org-html-viewport) (:html-inline-images nil nil org-html-inline-images) ...) ((:filter-options . org-html-infojs-install-script) (:filter-final-output . org-html-final-function)) nil (104 "Export to HTML" ((72 "As HTML buffer" org-html-export-as-html) (104 "As HTML file" org-html-export-to-html) (111 "As HTML file and open" (lambda (a s v b) (if a (org-html-export-to-html t s v b) (org-open-file (org-html-export-to-html nil s v b)))))))] nil (:output-file "./org-test.html"))
  org-export-as(html nil nil nil (:output-file "./org-test.html"))
  org-export-to-file(html "./org-test.html" nil nil nil nil nil)
  org-html-export-to-html(nil nil nil nil)
  (org-open-file (org-html-export-to-html nil s v b))
  (if a (org-html-export-to-html t s v b) (org-open-file (org-html-export-to-html nil s v b)))
  (lambda (a s v b) (if a (org-html-export-to-html t s v b) (org-open-file (org-html-export-to-html nil s v b))))(nil nil nil nil)
  org-export-dispatch(nil)
  funcall-interactively(org-export-dispatch nil)
  call-interactively(org-export-dispatch nil nil)
  command-execute(org-export-dispatch)

+============