diff options
Diffstat (limited to 'lisp/format.el')
| -rw-r--r-- | lisp/format.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/format.el b/lisp/format.el index 5dff28edd3c..c2a096f09d6 100644 --- a/lisp/format.el +++ b/lisp/format.el @@ -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) |