Re: add ansi-color.el to XEmacs?
Alex Schroeder <asc(a)bsiag.com> writes:
Maybe you want to add ansi-color.el to XEmacs? It is already part
of Emacs.
Looks cool. Supports XEmacs native interfaces (extents). I don't see
why not.
(defun ansi-color-unfontify-region (beg end &rest xemacs-stuff)
"Replacement function for `font-lock-default-unfontify-region'.
When font-lock is active in a buffer, you cannot simply add face
text-properties to the buffer. Font-lock will remove the face
text-property using `font-lock-unfontify-region-function'.
I don't think this is the case under XEmacs. font-lock uses the
text-property functions, which in turn touch only the extents they
know about. If you create a new extent and apply a face to it,
font-lock will not touch it.
(defun ansi-color-get-face-1 (ansi-code)
"Get face definition from `ansi-color-map'.
ANSI-CODE is used as an index into the vector."
(condition-case nil
(aref ansi-color-map ansi-code)
('args-out-of-range nil)))
^ this quote is not needed.