mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 01:32:52 +00:00
Fix clocking to allow again selection of a task in the history
This commit is contained in:
parent
d5230f0ec7
commit
c59c2b791d
|
@ -1,5 +1,8 @@
|
||||||
2009-11-27 Carsten Dominik <carsten.dominik@gmail.com>
|
2009-11-27 Carsten Dominik <carsten.dominik@gmail.com>
|
||||||
|
|
||||||
|
* org-clock.el (org-clock-in): Fix current task detection when a
|
||||||
|
task is selected from the clock history.
|
||||||
|
|
||||||
* org-latex.el (org-export-latex-class-options): New variable.
|
* org-latex.el (org-export-latex-class-options): New variable.
|
||||||
(org-export-latex-set-initial-vars): Use the class options.
|
(org-export-latex-set-initial-vars): Use the class options.
|
||||||
|
|
||||||
|
|
|
@ -854,8 +854,13 @@ the clocking selection, associated with the letter `d'."
|
||||||
(when (save-excursion
|
(when (save-excursion
|
||||||
(org-back-to-heading t)
|
(org-back-to-heading t)
|
||||||
(and (equal (marker-buffer org-clock-hd-marker)
|
(and (equal (marker-buffer org-clock-hd-marker)
|
||||||
(current-buffer))
|
(if selected-task
|
||||||
(= (marker-position org-clock-hd-marker) (point))))
|
(marker-buffer selected-task)
|
||||||
|
(current-buffer)))
|
||||||
|
(= (marker-position org-clock-hd-marker)
|
||||||
|
(if selected-task
|
||||||
|
(marker-position selected-task)
|
||||||
|
(point)))))
|
||||||
(message "Clock continues in \"%s\"" org-clock-heading)
|
(message "Clock continues in \"%s\"" org-clock-heading)
|
||||||
(throw 'abort nil))
|
(throw 'abort nil))
|
||||||
(move-marker org-clock-interrupted-task
|
(move-marker org-clock-interrupted-task
|
||||||
|
|
Loading…
Reference in a new issue