1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00

Mark python-mode abbrevs as system abbrevs.

* progmodes/python.el (python-skeleton-define): Mark abbrevs as
system abbrevs.

* ansi-color.el (ansi-color-apply-on-region): Doc fix.
This commit is contained in:
Chong Yidong 2012-06-23 17:28:10 +08:00
parent d054f3fb9a
commit 0e9e6c6abc
3 changed files with 15 additions and 6 deletions

View File

@ -1,3 +1,10 @@
2012-06-23 Chong Yidong <cyd@gnu.org>
* progmodes/python.el (python-skeleton-define): Mark abbrevs as
system abbrevs.
* ansi-color.el (ansi-color-apply-on-region): Doc fix.
2012-06-23 Stefan Monnier <monnier@iro.umontreal.ca> 2012-06-23 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/cl-macs.el (cl--make-usage-args): Handle improper lists * emacs-lisp/cl-macs.el (cl--make-usage-args): Handle improper lists

View File

@ -358,11 +358,12 @@ it will override BEGIN, the start of the region. Set
"Translates SGR control sequences into overlays or extents. "Translates SGR control sequences into overlays or extents.
Delete all other control sequences without processing them. Delete all other control sequences without processing them.
SGR control sequences are applied by setting foreground and SGR control sequences are applied by calling the function
background colors to the text between BEGIN and END using specified by `ansi-color-apply-face-function'. The default
overlays. The colors used are given in `ansi-color-faces-vector' function sets foreground and background colors to the text
and `ansi-color-names-vector'. See `ansi-color-apply-sequence' between BEGIN and END, using overlays. The colors used are given
for details. in `ansi-color-faces-vector' and `ansi-color-names-vector'. See
`ansi-color-apply-sequence' for details.
Every call to this function will set and use the buffer-local variable Every call to this function will set and use the buffer-local variable
`ansi-color-context-region' to save position and current face. This `ansi-color-context-region' to save position and current face. This

View File

@ -2152,7 +2152,8 @@ be added to `python-mode-abbrev-table'."
(let* ((name (symbol-name name)) (let* ((name (symbol-name name))
(function-name (intern (concat "python-skeleton-" name)))) (function-name (intern (concat "python-skeleton-" name))))
`(progn `(progn
(define-abbrev python-mode-abbrev-table ,name "" ',function-name) (define-abbrev python-mode-abbrev-table ,name "" ',function-name
:system t)
(setq python-skeleton-available (setq python-skeleton-available
(cons ',function-name python-skeleton-available)) (cons ',function-name python-skeleton-available))
(define-skeleton ,function-name (define-skeleton ,function-name