Преглед на файлове

`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 преди 15 години
родител
ревизия
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