emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master b554efb 287/433: After fontifying the region, restore loca


From: Dmitry Gutov
Subject: [elpa] master b554efb 287/433: After fontifying the region, restore local vars
Date: Thu, 15 Mar 2018 19:44:22 -0400 (EDT)

branch: master
commit b554efb5d8530414113bf871ac97c46053da339a
Author: Dmitry Gutov <address@hidden>
Commit: Steve Purcell <address@hidden>

    After fontifying the region, restore local vars
---
 mmm-compat.el | 2 +-
 mmm-region.el | 8 +++++---
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/mmm-compat.el b/mmm-compat.el
index c963c86..ce9e736 100644
--- a/mmm-compat.el
+++ b/mmm-compat.el
@@ -190,4 +190,4 @@ buffer \(name begins with a space).  So in XEmacs, we just 
call
 
 (provide 'mmm-compat)
 
-;;; mmm-compat.el ends here
\ No newline at end of file
+;;; mmm-compat.el ends here
diff --git a/mmm-region.el b/mmm-region.el
index bfac6df..211fec8 100644
--- a/mmm-region.el
+++ b/mmm-region.el
@@ -590,6 +590,7 @@ different keymaps, syntax tables, local variables, etc. for 
submodes."
 (defun mmm-add-hooks ()
   (if (featurep 'xemacs)
       (make-local-hook 'post-command-hook))
+  ;; FIXME: Use text properties `point-entered' and `point-left' instead?
   (add-hook 'post-command-hook 'mmm-update-submode-region nil 'local))
 
 (defun mmm-remove-hooks ()
@@ -777,9 +778,10 @@ of the REGIONS covers START to STOP."
                 (when (get (car elt) 'mmm-font-lock-mode)
                   (mmm-fontify-region-list (car elt) (cdr elt))))
             (mmm-regions-alist start stop)))
-  ;; With jit-lock, this causes blips in the mode line and menus.
-  ;; Shouldn't be necessary here, since it's in post-command-hook too.
-  ;;(mmm-update-submode-region)
+  ;; It's in `post-command-hook' too, but that's executed before font-lock,
+  ;; so the latter messes up local vars (such as line-indent-function)
+  ;; until after the next command.
+  (mmm-update-submode-region)
   (when loudly (message nil)))
 
 (defun mmm-fontify-region-list (mode regions)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]