Add text properties to newlines used to unwrap long lines.

* lisp/term.el (term-emulate-terminal): do it.
This commit is contained in:
John Shahid 2019-02-26 01:06:53 -05:00 committed by Stefan Monnier
parent e828765d01
commit 52cd63d528

View file

@ -2935,6 +2935,7 @@ See `term-prompt-regexp'."
(delete-region (point) (line-end-position))
(term-down 1 t)
(term-move-columns (- (term-current-column)))
(put-text-property (1- (point)) (point) 'term-line-wrap t)
(setq decoded-substring
(substring decoded-substring (- term-width old-column)))
(setq old-column 0)))