How to exclude {{{ ... }}} in flyspell-mode and flyspell-buffer?
The variable ispell-skip-region-alist
does what you want when spell checking the buffer, but not for flyspell. Just add an entry like
(add-to-list 'ispell-skip-region-alist
'("^{{{" . "^}}}"))
Unfortunately, it's not as easy to get flyspell to ignore certain regions. You have to use flyspell-generic-check-word-predicate
which is a function. Several modes already define this so you would have to add the following as advice to those functions. I'll assume for simplicity though that you are using a mode (I used text-mode
below) which doesn't have it defined. Then you can add the following to your .emacs:
(defun flyspell-ignore-verbatim ()
"Function used for `flyspell-generic-check-word-predicate' to ignore {{{ }}} blocks."
(save-excursion
(widen)
(let ((p (point))
(count 0))
(not (or (and (re-search-backward "^{{{" nil t)
(> p (point))
;; If there is no closing }}} then assume we're still in it
(or (not (re-search-forward "^}}}" nil t))
(< p (point))))
(eq 1 (progn (while (re-search-backward "`" (line-beginning-position) t)
(setq count (1+ count)))
(- count (* 2 (/ count 2))))))))))
(put 'text-mode 'flyspell-mode-predicate 'flyspell-ignore-verbatim)