summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--test-org-link-edit.el7
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))