Remove Emacs 24 compat code from reftex
* lisp/textmodes/reftex-index.el (reftex-display-index): * lisp/textmodes/reftex-toc.el (reftex-toc): Assume that we have 'cursor-intangible-mode', which was added in Emacs 25.
This commit is contained in:
parent
8e8468c46d
commit
89833430f1
2 changed files with 2 additions and 10 deletions
|
@ -539,11 +539,7 @@ SPC=view TAB=goto RET=goto+hide [e]dit [q]uit [r]escan [f]ollow [?]Help
|
|||
(if (reftex-use-fonts)
|
||||
(put-text-property (point-min) (point)
|
||||
'face reftex-index-header-face))
|
||||
(if (fboundp 'cursor-intangible-mode)
|
||||
(cursor-intangible-mode 1)
|
||||
;; If `cursor-intangible' is not available, fallback on the old
|
||||
;; intrusive `intangible' property.
|
||||
(put-text-property (point-min) (point) 'intangible t))
|
||||
(cursor-intangible-mode 1)
|
||||
(add-text-properties (point-min) (point)
|
||||
'(cursor-intangible t
|
||||
front-sticky (cursor-intangible)
|
||||
|
|
|
@ -265,11 +265,7 @@ SPC=view TAB=goto RET=goto+hide [q]uit [r]escan [l]abels [f]ollow [x]r [?]Help
|
|||
|
||||
(if (reftex-use-fonts)
|
||||
(put-text-property (point-min) (point) 'font-lock-face reftex-toc-header-face))
|
||||
(if (fboundp 'cursor-intangible-mode)
|
||||
(cursor-intangible-mode 1)
|
||||
;; If `cursor-intangible' is not available, fallback on the old
|
||||
;; intrusive `intangible' property.
|
||||
(put-text-property (point-min) (point) 'intangible t))
|
||||
(cursor-intangible-mode 1)
|
||||
(add-text-properties (point-min) (point)
|
||||
'(cursor-intangible t
|
||||
front-sticky (cursor-intangible)
|
||||
|
|
Loading…
Add table
Reference in a new issue