415 |
start of the region and set the face with which to start. Set |
start of the region and set the face with which to start. Set |
416 |
`ansi-color-context-region' to nil if you don't want this." |
`ansi-color-context-region' to nil if you don't want this." |
417 |
(let ((face (car ansi-color-context-region)) |
(let ((face (car ansi-color-context-region)) |
418 |
(start-marker (or (cadr ansi-color-context-region) |
(start-marker (or (cadr ansi-color-context-region) |
419 |
(copy-marker begin))) |
(copy-marker begin))) |
420 |
(end-marker (copy-marker end)) |
(end-marker (copy-marker end)) |
421 |
escape-sequence) |
escape-sequence) |
481 |
|
|
482 |
(defun ansi-color-make-face (property color) |
(defun ansi-color-make-face (property color) |
483 |
"Return a face with PROPERTY set to COLOR. |
"Return a face with PROPERTY set to COLOR. |
484 |
PROPERTY can be either symbol `foreground' or symbol `background'. |
PROPERTY can be either symbol `foreground' or symbol `background'. |
485 |
|
|
486 |
For Emacs, we just return the cons cell \(PROPERTY . COLOR). |
For Emacs, we just return the cons cell \(PROPERTY . COLOR). |
487 |
For XEmacs, we create a temporary face and return it." |
For XEmacs, we create a temporary face and return it." |