tests/transport-next-link: Check "description exists" error

1 files changed, 7 insertions, 0 deletions

diff --git a/test-org-link-edit.el b/test-org-link-edit.el
index da69fd2..9f8a3bd 100644
--- a/test-org-link-edit.el
+++ b/test-org-link-edit.el
@@ -558,6 +558,13 @@ website"
      (org-link-edit-transport-next-link
       nil (point-min) (point))
      (buffer-string))
+   :type 'user-error)
+  ;; Fail if link already has a description.
+  (should-error
+   (org-test-with-temp-text
+       "Here is <point>Org's website \[\[http://orgmode.org/\]\[descrption\]\]"
+     (org-link-edit-transport-next-link)
+     (buffer-string))
    :type 'user-error))