Add text properties to newlines used to unwrap long lines.
* lisp/term.el (term-emulate-terminal): do it.
This commit is contained in:
parent
e828765d01
commit
52cd63d528
1 changed files with 1 additions and 0 deletions
|
@ -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)))
|
||||
|
|
Loading…
Add table
Reference in a new issue