0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 22:47:56 +00:00

Tiny refactoring

* lisp/org.el (org-edit-special): Tiny refactoring.
This commit is contained in:
Nicolas Goaziou 2016-09-24 09:07:12 +02:00
parent 038c50a721
commit 5bc8492388

View file

@ -20980,8 +20980,7 @@ On a link, call `ffap' to visit the link at point.
Otherwise, return a user error."
(interactive "P")
(let ((element (org-element-at-point)))
(cl-assert (not buffer-read-only) nil
"Buffer is read-only: %s" (buffer-name))
(barf-if-buffer-read-only)
(pcase (org-element-type element)
(`src-block
(if (not arg) (org-edit-src-code)