Commit 0b140219 authored by Karl Heuer's avatar Karl Heuer
Browse files

(format-deannotate-region): In case of unmatched tags,

avoid using nil where end position is expected.
parent ac1f790a
......@@ -636,7 +636,7 @@ to write these unknown annotations back into the file."
;; Store as value of text-property `unknown'.
(let ((extents top-extents)
(start (car (car top-extents)))
(loc (cdr (car top-extents))))
(loc (or (cdr (car top-extents)) loc)))
(while extents
(setq open-ans (cdr open-ans)
todo (cons (list start loc 'unknown top-name)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment