[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] temporary set source blocks major-mode-hook to nil locally to sp
From: |
Nicolas Goaziou |
Subject: |
Re: [O] temporary set source blocks major-mode-hook to nil locally to speed up Org Mode |
Date: |
Fri, 19 Oct 2018 00:17:59 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux) |
Hello,
stardiviner <address@hidden> writes:
> Here is my try:
>
> #+begin_src diff
> modified lisp/org-src.el
> @@ -585,7 +585,14 @@ as `org-src-fontify-natively' is non-nil."
> (erase-buffer)
> ;; Add string and a final space to ensure property change.
> (insert string " "))
> - (unless (eq major-mode lang-mode) (funcall lang-mode))
> + (unless (eq major-mode lang-mode)
> + (message "%s enabled in source block" lang-mode)
> + ;; (make-local-variable (intern (format "%s-hook" lang-mode)))
> + ;; (set (intern (format "%s-hook" lang-mode)) nil)
> + (message "%s is %s"
> + (intern (format "%s-hook" lang-mode))
> + (symbol-value (intern (format "%s-hook" lang-mode))))
> + (funcall lang-mode))
> (org-font-lock-ensure)
> (let ((pos (point-min)) next)
> (while (setq next (next-property-change pos))
> #+end_src
>
> But it seems does not work as I expected.
Did you try to set the hook to a different value before (funcall lang-mode)?
Regards,
--
Nicolas Goaziou