Просмотр исходного кода

`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 лет назад
Родитель
Сommit
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