                      ((1515334380.0 . 1515338220.0)
                       (1515423600.0 . 1515424500.0)))))))
 
-
 (ert-deftest timeline-tools-test-parse-clocklines-4 ()
   "Test `timeline-tools-clocklines-in-range’ with extended time range."
   (let ((result (with-temp-buffer

;;; timeline-tools-test.el -- Tests for timeline-tools -*- lexical-binding: t -*-

;;; Code:


                  (insert ":LOGBOOK:\n")
                  (insert "CLOCK: [2018-01-07 Sun 13:15]--[2018-01-07 Sun 14:00] => 0:45\n")
                  (insert ":END:\n")
                  (org-mode)
                  (timeline-tools-clocklines-in-range 1515279600.0 1515366000.0))))
    (should (equal 1 (length result)))
    (should (equal 2 (length (car result))))
