From 5bc849238891683bc30b7fdd43fee514ef7fab9d Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Sat, 24 Sep 2016 09:07:12 +0200
Subject: [PATCH] Tiny refactoring

* lisp/org.el (org-edit-special): Tiny refactoring.
---
 lisp/org.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index e03d6553f..b3c0efc23 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -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)