diff options
author | Norbert Preining <norbert@preining.info> | 2021-12-28 03:01:00 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2021-12-28 03:01:00 +0000 |
commit | ecdf859b6ce481abfd530425dcf6f0f764bd0001 (patch) | |
tree | 13bc161dc046876ac6c92fce5f9f5034ba9aa573 /graphics/asymptote/base/asy-mode.el | |
parent | 790995b7e79697514364450bf9c04f1b8d500838 (diff) |
CTAN sync 202112280300
Diffstat (limited to 'graphics/asymptote/base/asy-mode.el')
-rw-r--r-- | graphics/asymptote/base/asy-mode.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/graphics/asymptote/base/asy-mode.el b/graphics/asymptote/base/asy-mode.el index ec3a3746d7..9f6eda793c 100644 --- a/graphics/asymptote/base/asy-mode.el +++ b/graphics/asymptote/base/asy-mode.el @@ -110,7 +110,7 @@ Some variables can be customized: M-x customize-group <RET> asymptote <RET>." (require 'font-lock) (require 'cc-mode) -(require 'cl) ;; Common Lisp extensions for Emacs +(require 'cl-lib) ;; Common Lisp extensions for Emacs (require 'compile) (require 'wid-edit) @@ -637,6 +637,9 @@ Fields are defined as 'field1: field2.field3:field4' . Field=0 <-> all fields" (if (locate-library "two-mode-mode") (progn +;; patch two-mode-mode.el for Emacs >= 23. + (defun make-local-hook (func)) + (defvar lasy-fontify-asy-p nil "Variable to communicate with `font-lock-unfontify-region'. Internal use, don't set in any fashion.") @@ -682,7 +685,8 @@ the current mode." (setq lasy-fontify-asy-p (eq func 'asy-mode)) (funcall func) (hack-local-variables) - (two-mode-mode-setup) +;; avoid infinite loop in two-mode-mode +;; (two-mode-mode-setup) (if two-mode-switch-hook (run-hooks 'two-mode-switch-hook)) (if (eq font-lock-mode t) |