diff options
| author | John Shahid | 2019-02-26 01:06:53 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2019-02-27 08:53:14 -0500 |
| commit | 52cd63d52810cc6463c0876d83d688fcb9593192 (patch) | |
| tree | 921468b80b0c6f5f5addd18578abcf17b36b0365 | |
| parent | e828765d01313acddcf17279b6b43ae9f777f2a4 (diff) | |
| download | emacs-52cd63d52810cc6463c0876d83d688fcb9593192.tar.gz emacs-52cd63d52810cc6463c0876d83d688fcb9593192.zip | |
Add text properties to newlines used to unwrap long lines.
* lisp/term.el (term-emulate-terminal): do it.
| -rw-r--r-- | lisp/term.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/term.el b/lisp/term.el index e759bb8e4fd..693362cc734 100644 --- a/lisp/term.el +++ b/lisp/term.el | |||
| @@ -2935,6 +2935,7 @@ See `term-prompt-regexp'." | |||
| 2935 | (delete-region (point) (line-end-position)) | 2935 | (delete-region (point) (line-end-position)) |
| 2936 | (term-down 1 t) | 2936 | (term-down 1 t) |
| 2937 | (term-move-columns (- (term-current-column))) | 2937 | (term-move-columns (- (term-current-column))) |
| 2938 | (put-text-property (1- (point)) (point) 'term-line-wrap t) | ||
| 2938 | (setq decoded-substring | 2939 | (setq decoded-substring |
| 2939 | (substring decoded-substring (- term-width old-column))) | 2940 | (substring decoded-substring (- term-width old-column))) |
| 2940 | (setq old-column 0))) | 2941 | (setq old-column 0))) |