diff options
author | Basil L. Contovounesios <contovob@tcd.ie> | 2019-08-01 15:59:46 +0300 |
---|---|---|
committer | Basil L. Contovounesios <contovob@tcd.ie> | 2019-08-01 17:04:53 +0300 |
commit | 2267110b6f00bbb0ad87f4621e6ecd9dc1bd8581 (patch) | |
tree | fdbe65f9e6a975a3614d66613f499d406df77226 /lisp/progmodes/prog-mode.el | |
parent | 6a77aa4a2c34e6edee06c9831687927543c75391 (diff) | |
download | emacs-2267110b6f00bbb0ad87f4621e6ecd9dc1bd8581.tar.gz emacs-2267110b6f00bbb0ad87f4621e6ecd9dc1bd8581.tar.bz2 emacs-2267110b6f00bbb0ad87f4621e6ecd9dc1bd8581.zip |
Fix usage of remove-text-properties
* lisp/allout-widgets.el (allout-decorate-item-icon):
* lisp/emacs-lisp/chart.el (chart-goto-xy):
* lisp/forms.el (forms--make-format)
(forms--make-format-elt-using-text-properties):
* lisp/htmlfontify.el (hfy-unmark-trailing-whitespace):
* lisp/net/newst-plainview.el (newsticker-hide-entry)
(newsticker-show-entry):
* lisp/nxml/nxml-mode.el (nxml-cleanup):
* lisp/obsolete/longlines.el (longlines-unshow-hard-newlines)
(longlines-encode-region):
* lisp/org/ob-exp.el (org-babel-exp-process-buffer):
* lisp/org/org-agenda.el (org-agenda-show-new-time):
* lisp/progmodes/cc-defs.el
(c-clear-char-property-with-value-function)
(c-clear-char-property-with-value-on-char-function):
* lisp/progmodes/ebrowse.el (ebrowse--hide):
* lisp/progmodes/gdb-mi.el (gdb-send):
* lisp/progmodes/idlw-shell.el
(idlwave-retrieve-expression-from-level):
* lisp/progmodes/make-mode.el (makefile-fill-paragraph):
* lisp/progmodes/prog-mode.el (prettify-symbols--post-command-hook):
* lisp/progmodes/ruby-mode.el (ruby-syntax-propertize):
* lisp/tmm.el (tmm-remove-inactive-mouse-face):
Always pass an explicit plist to remove-text-properties.
* lisp/dired.el (dired--unhide):
* lisp/facemenu.el (facemenu-add-face):
* lisp/htmlfontify.el (hfy-fontify-buffer):
* lisp/iimage.el (iimage-mode-buffer):
* lisp/image-file.el (image-file-yank-handler):
* lisp/progmodes/prog-mode.el (prettify-symbols--compose-symbol):
* lisp/textmodes/tex-mode.el (latex-env-before-change):
* test/src/undo-tests.el (undo-test0):
Use remove-list-of-text-properties in place of
remove-text-properties where appropriate.
Diffstat (limited to 'lisp/progmodes/prog-mode.el')
-rw-r--r-- | lisp/progmodes/prog-mode.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/progmodes/prog-mode.el b/lisp/progmodes/prog-mode.el index 79fe56aebbf..cb39e62265d 100644 --- a/lisp/progmodes/prog-mode.el +++ b/lisp/progmodes/prog-mode.el @@ -138,9 +138,10 @@ Regexp match data 0 specifies the characters to be composed." ;; No composition for you. Let's actually remove any ;; composition we may have added earlier and which is now ;; incorrect. - (remove-text-properties start end '(composition - prettify-symbols-start - prettify-symbols-end)))) + (remove-list-of-text-properties start end + '(composition + prettify-symbols-start + prettify-symbols-end)))) ;; Return nil because we're not adding any face property. nil) @@ -191,7 +192,7 @@ on the symbol." (e (apply #'max e))) (with-silent-modifications (setq prettify-symbols--current-symbol-bounds (list s e)) - (remove-text-properties s e '(composition)))))) + (remove-text-properties s e '(composition nil)))))) ;;;###autoload (define-minor-mode prettify-symbols-mode |