Mercurial > emacs
comparison lisp/term.el @ 104168:ffb29f8afea3
* term.el (term-handle-ansi-escape): Add comments with the
terminfo capabilities implemented.
* e/eterm-color.ti (msgr, u6, u7): New capabilities.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Fri, 07 Aug 2009 07:04:02 +0000 |
| parents | dd124f584769 |
| children | 62681dd69ecb |
comparison
equal
deleted
inserted
replaced
| 104167:a443b35b34e0 | 104168:ffb29f8afea3 |
|---|---|
| 3361 (when (>= term-terminal-previous-parameter-2 0) | 3361 (when (>= term-terminal-previous-parameter-2 0) |
| 3362 (term-handle-colors-array term-terminal-previous-parameter-2)) | 3362 (term-handle-colors-array term-terminal-previous-parameter-2)) |
| 3363 (term-handle-colors-array term-terminal-previous-parameter)) | 3363 (term-handle-colors-array term-terminal-previous-parameter)) |
| 3364 (term-handle-colors-array term-terminal-parameter)) | 3364 (term-handle-colors-array term-terminal-parameter)) |
| 3365 | 3365 |
| 3366 ;; \E[6n - Report cursor position | 3366 ;; \E[6n - Report cursor position (terminfo: u7) |
| 3367 ((eq char ?n) | 3367 ((eq char ?n) |
| 3368 (term-handle-deferred-scroll) | 3368 (term-handle-deferred-scroll) |
| 3369 (process-send-string proc | 3369 (process-send-string proc |
| 3370 ;; (terminfo: u6) | |
| 3370 (format "\e[%s;%sR" | 3371 (format "\e[%s;%sR" |
| 3371 (1+ (term-current-row)) | 3372 (1+ (term-current-row)) |
| 3372 (1+ (term-horizontal-column))))) | 3373 (1+ (term-horizontal-column))))) |
| 3373 ;; \E[r - Set scrolling region (terminfo: csr) | 3374 ;; \E[r - Set scrolling region (terminfo: csr) |
| 3374 ((eq char ?r) | 3375 ((eq char ?r) |