[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/coterm dbdb26547c: Fix \e[K if current column is beyond
From: |
ELPA Syncer |
Subject: |
[elpa] externals/coterm dbdb26547c: Fix \e[K if current column is beyond terminal width |
Date: |
Fri, 31 Dec 2021 08:57:26 -0500 (EST) |
branch: externals/coterm
commit dbdb26547c769f1f9e64cc2479cb9eeef1e5ac6a
Author: Miha Rihtaršič <miha@kamnitnik.top>
Commit: Miha Rihtaršič <miha@kamnitnik.top>
Fix \e[K if current column is beyond terminal width
In ordinary terminals, current column is never bigger than terminal width,
but
in coterm, we intentionally allow it in order to leave line wrapping up to
Emacs. See the commentary at the start of ';;; Terminal emulation' section
in
coterm.el for more information.
---
coterm.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/coterm.el b/coterm.el
index a546758020..f577f227f1 100644
--- a/coterm.el
+++ b/coterm.el
@@ -1106,9 +1106,10 @@ buffer and the scrolling region must cover the whole
screen."
(coterm--t-delete-region coterm--t-row 0
coterm--t-row coterm--t-col)
(coterm--t-open-space proc-filt process 0
coterm--t-col))
- (?K (coterm--t-delete-region
- coterm--t-row coterm--t-col
- coterm--t-row coterm--t-width))
+ (?K (when (< coterm--t-col coterm--t-width)
+ (coterm--t-delete-region
+ coterm--t-row coterm--t-col
+ coterm--t-row coterm--t-width)))
(?L ;; \E[L - insert lines (terminfo: il, il1)
(when (<= coterm--t-scroll-beg coterm--t-row
(1- coterm--t-scroll-end))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/coterm dbdb26547c: Fix \e[K if current column is beyond terminal width,
ELPA Syncer <=