emacs-orgmode
[Top][All Lists]
Advanced

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

[O] [PATCH v2] org.el: Don't flyspell check within source code blocks


From: Trevor Murphy
Subject: [O] [PATCH v2] org.el: Don't flyspell check within source code blocks
Date: Wed, 29 May 2013 20:49:55 -0400

* lisp/org.el (org-mode-flyspell-verify): Add check for
  `org-in-src-block-p'.

TINYCHANGE
---
 lisp/org.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index 94078f9..77de2d7 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -23596,7 +23596,8 @@ To get rid of the restriction, use 
\\[org-agenda-remove-restriction-lock]."
         (not (member-ignore-case word (org-get-export-keywords)))
         (not (member-ignore-case
               word (mapcar 'car org-element-block-name-alist)))
-        (not (member-ignore-case word '("BEGIN" "END" "ATTR"))))))
+        (not (member-ignore-case word '("BEGIN" "END" "ATTR")))
+        (not (org-in-src-block-p)))))
 
 (defun org-remove-flyspell-overlays-in (beg end)
   "Remove flyspell overlays in region."
-- 
1.8.3




reply via email to

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