> -         (if (>= end beg) temp
> -           (goto-char beg)
> -           (insert "\n")
> -           (org-edit-src-find-region-and-lang))))
> +         (if (and beg end)
> +             (if (>= end beg)
> +                 temp
> +               (goto-char beg)
> +               (insert "\n")
> +               (org-edit-src-find-region-and-lang))
> +           (error "Point not in src block."))))

Note: this is 

  (if (and beg end (>= end beg)) ... ...)

Let's try to optimize such tiny refactoring :)

-- 
 Bastien

Reply via email to