From b3665250778fc6c14411d71aa305fd3f312042c9 Mon Sep 17 00:00:00 2001
From: York Zhao <gtdplatform@gmail.com>
Date: Sun, 1 Jun 2014 10:53:19 +0200
Subject: [PATCH] test-org-element.el (test-org-element/org-open-at-point): Add
 test

* test-org-element.el (test-org-element/org-open-at-point):
Add test.

TINYCHANGE
---
 testing/lisp/test-org-element.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/testing/lisp/test-org-element.el b/testing/lisp/test-org-element.el
index d3a5428f4..ee405855f 100644
--- a/testing/lisp/test-org-element.el
+++ b/testing/lisp/test-org-element.el
@@ -1479,6 +1479,14 @@ e^{i\\pi}+1=0
 	    (search-forward "file:")
 	    (org-element-property :type (org-element-context))))))
 
+(ert-deftest test-org-element/org-open-at-point ()
+  "Test `org-open-at-point' with link being a heading property."
+  (org-test-with-temp-text
+   "* Headline
+:PROPERTIES:
+:URL: <point>[[info:org#Top]]
+:END:"
+   (org-open-at-point)))
 
 ;;;; Macro