Преглед изворни кода

`org-timer-set-timer': allow to run even before the first heading.

In this case, the notification will tell the user in what file the timer
was set.
Bastien Guerry пре 14 година
родитељ
комит
4f95c5469c
1 измењених фајлова са 4 додато и 2 уклоњено
  1. 4 2
      lisp/org-timer.el

+ 4 - 2
lisp/org-timer.el

@@ -366,9 +366,11 @@ replace any running timer."
 		     (widen)
 		     (goto-char pos)
 		     (org-show-entry)
-		     (org-get-heading))))
+		     (or (ignore-errors (org-get-heading))
+			 (concat "File:" (file-name-nondirectory (buffer-file-name)))))))
 		((eq major-mode 'org-mode)
-		 (org-get-heading))
+		 (or (ignore-errors (org-get-heading))
+		     (concat "File:" (file-name-nondirectory (buffer-file-name)))))
 		(t (error "Not in an Org buffer"))))
 	   timer-set)
       (if (or (and org-timer-current-timer