master 0380827 1/2: * lisp/textmodes/rst.el (rst-mode): Don't touch global hook

[Stefan Monnier]

branch: master
commit 03808272eeaaf65a257f69ad91c3a3bebe186439
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * lisp/textmodes/rst.el (rst-mode): Don't touch global hook
    
    (rst-re): η-reduce.
---
 lisp/textmodes/rst.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/lisp/textmodes/rst.el b/lisp/textmodes/rst.el
index 435de26..6090cea 100644
--- a/lisp/textmodes/rst.el
+++ b/lisp/textmodes/rst.el
@@ -568,9 +568,7 @@ After interpretation of ARGS the results are concatenated 
as for
                (regexp-quote (char-to-string re)))
               ((listp re)
                (let ((nested
-                      (mapcar (lambda (elt)
-                                (rst-re elt))
-                              (cdr re))))
+                      (mapcar #'rst-re (cdr re))))
                  (cond
                   ((eq (car re) :seq)
                    (mapconcat #'identity nested ""))
@@ -1398,7 +1396,8 @@ highlighting.
                t nil nil nil
                (font-lock-multiline . t)
                (font-lock-mark-block-function . mark-paragraph)))
-  (add-hook 'font-lock-extend-region-functions #'rst-font-lock-extend-region t)
+  (add-hook 'font-lock-extend-region-functions
+            #'rst-font-lock-extend-region nil t)
 
   ;; Text after a changed line may need new fontification.
   (setq-local jit-lock-contextually t)