Don't sort if no headlines available

rudolfochrist · Apr 9, 2015 · d366398 · d366398
1 parent f3464e1
commit d366398
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/interleave.el b/interleave.el
@@ -325,11 +325,16 @@ of .pdf)."
   (with-current-buffer *interleave--org-buffer*
     (widen)
     (goto-char (point-min))
-    (interleave--sort-notes interleave--sort-order)
-    (org-overview)
+    (when (interleave--headlines-available-p)
+      (interleave--sort-notes interleave--sort-order)
+      (org-overview))
     (interleave 0))
   (interleave--pdf-kill-proc-and-buffer))
 
+(defun interleave--headlines-available-p ()
+  (save-excursion
+    (re-search-forward "^\* .*" nil t)))
+
 (defcustom interleave--sort-order 'asc
   "Specifiy the notes' sort order in the notes buffer.