Ack, what?  Please disregard, I slipped a double negative in somehow.


On Sat, May 25, 2013 at 3:17 AM, Trevor Murphy <trevor.m.murphy@gmail.com>wrote:

> * lisp/org.el (org-mode-flyspell-verify): Check if
>   `org-element-at-point' is of type `src-block', and don't flyspell if
>   that's the case.
>
> TINYCHANGE
> ---
>  lisp/org.el | 3 ++-
>  1 file changed, 2 insertions(+), 1 deletion(-)
>
> diff --git a/lisp/org.el b/lisp/org.el
> index 94078f9..81428f5 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 (not (eq (org-element-type (org-element-at-point))
> 'src-block))))))
>
>  (defun org-remove-flyspell-overlays-in (beg end)
>    "Remove flyspell overlays in region."
> --
> 1.8.2.3
>
>