From 8c08ee0f8d0de19be5822bc666ed96c4481c87c0 Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Mon, 16 Jan 2017 22:26:47 +0100
Subject: [PATCH] test-org: Add test

* testing/lisp/test-org.el (test-org/clone-with-time-shift): Add test.
---
 testing/lisp/test-org.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/testing/lisp/test-org.el b/testing/lisp/test-org.el
index b227cbc9c..ef2a68a0c 100644
--- a/testing/lisp/test-org.el
+++ b/testing/lisp/test-org.el
@@ -1313,6 +1313,10 @@
 
 (ert-deftest test-org/clone-with-time-shift ()
   "Test `org-clone-subtree-with-time-shift'."
+  ;; Raise an error before first heading.
+  (should-error
+   (org-test-with-temp-text ""
+     (org-clone-subtree-with-time-shift 1)))
   ;; Clone non-repeating once.
   (should
    (equal "\
-- 
2.11.4.GIT