* Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry
@ 2009-11-09 17:12 Bernt Hansen
2009-11-09 19:30 ` Bernt Hansen
0 siblings, 1 reply; 7+ messages in thread
From: Bernt Hansen @ 2009-11-09 17:12 UTC (permalink / raw)
To: emacs-orgmode
Remember to cover the basics, that is, what you expected to happen and
what in fact did happen. You don't know how to make a good report? See
http://orgmode.org/manual/Feedback.html#Feedback
Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------
Clocking out of a task moves point to the clock entry being closed.
This makes my workaround for clocking in a new task (just use a speed
key O to clock out and I to clock in) fail since we jump away from the
task that I want to clock in.
Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11)
of 2008-11-09 on raven, modified by Debian
Package: Org-mode version 6.32trans (release_6.32b.127.g471c2)
current state:
==============
(setq
org-export-html-final-hook '(org-inlinetask-remove-terminator)
org-log-done 'time
org-remember-default-headline "Tasks"
org-clock-in-switch-to-state "STARTED"
org-todo-keyword-faces '(("TODO" :foreground "red" :weight bold)
("STARTED" :foreground "blue" :weight bold)
("DONE" :foreground "forest green" :weight bold)
("WAITING" :foreground "orange" :weight bold)
("SOMEDAY" :foreground "magenta" :weight bold)
("CANCELLED" :foreground "forest green" :weight bold)
("QUOTE" :foreground "red" :weight bold)
("QUOTED" :foreground "magenta" :weight bold)
("APPROVED" :foreground "forest green" :weight bold)
("EXPIRED" :foreground "forest green" :weight bold)
("REJECTED" :foreground "forest green" :weight bold)
("OPEN" :foreground "blue" :weight bold))
org-show-siblings nil
org-special-ctrl-a/e t
org-agenda-clockreport-parameter-plist '(:link nil :maxlevel 2)
org-default-priority 71
org-agenda-custom-commands '(("s" "Started Tasks" todo "STARTED"
((org-agenda-todo-ignore-scheduled nil)
(org-agenda-todo-ignore-deadlines nil)
(org-agenda-todo-ignore-with-date nil))
)
("w" "Tasks waiting on something" tags "WAITING/!"
((org-use-tag-inheritance nil)))
("r" "Refile New Notes and Tasks" tags "LEVEL=1+REFILE"
((org-agenda-todo-ignore-with-date nil)))
("N" "Notes" tags "NOTE" nil)
("n" "Next" tags "NEXT-WAITING-CANCELLED/!" nil)
("p" "Projects" tags-todo "LEVEL=2-NEXT-WAITING-CANCELLED/!-DONE" nil)
("A" "Tasks to be Archived" tags "LEVEL=2/DONE|CANCELLED" nil))
org-agenda-files '("~/git/bzflag/bzflag-website/TODO.org" "~/git/org/bzflag.org"
"~/git/org/git.org" "~/git/org/todo.org" "~/git/org/jobs.org"
"~/git/org/refile.org" "~/git/org/farm.org" "~/git/org/mark.org"
"~/git/org/org.org" "~/git/org/norang.org")
org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
org-agenda-tags-column -102
org-export-ascii-final-hook '(org-inlinetask-remove-terminator)
org-export-with-sub-superscripts nil
org-clock-into-drawer "CLOCK"
org-checklist-export-function 'org-export-as-ascii
org-completion-use-ido t
org-metaup-hook '(org-babel-load-in-session-maybe)
org-agenda-skip-timestamp-if-done t
org-after-todo-state-change-hook '(org-checklist org-clock-out-if-current)
org-clock-out-when-done nil
org-agenda-text-search-extra-files '(agenda-archives)
org-agenda-todo-ignore-scheduled t
org-clock-history-length 35
org-babel-interpreters '("ditaa" "python" "ruby" "R" "sh" "emacs-lisp")
org-show-hierarchy-above t
org-time-stamp-rounding-minutes '(1 15)
org-speed-commands-user '(("1" . delete-other-windows) ("2" . split-window-horizontally)
("3" . split-window-vertically))
org-todo-state-tags-triggers '(("CANCELLED" ("CANCELLED" . t)) ("WAITING" ("WAITING" . t) ("NEXT"))
("SOMEDAY" ("WAITING" . t)) (done ("NEXT") ("WAITING"))
("TODO" ("WAITING") ("CANCELLED") ("NEXT"))
("DONE" ("WAITING") ("CANCELLED") ("NEXT")))
org-special-ctrl-k t
org-remember-clock-out-on-exit nil
org-agenda-sorting-strategy '((agenda habit-down time-up priority-down effort-up category-up)
(todo priority-down) (tags priority-down))
org-deadline-warning-days 30
org-agenda-skip-scheduled-if-done t
org-stuck-projects '("LEVEL=2-REFILE-WAITING|LEVEL=1+REFILE/!-DONE-CANCELLED-OPEN" nil ("NEXT") "")
org-agenda-time-grid '(nil "----------------" (800 1000 1200 1400 1600 1800 2000))
org-clock-in-resume t
org-quote-string "FOOBAR"
org-export-preprocess-hook '(org-export-blocks-preprocess)
org-tags-exclude-from-inheritance '("crypt")
org-tab-first-hook '(org-hide-block-toggle-maybe)
outline-regexp "\\*+ "
org-src-mode-hook '(org-src-mode-configure-edit-buffer)
org-finalize-agenda-hook '(bh/org-agenda-to-appt)
org-confirm-shell-link-function 'yes-or-no-p
org-table-export-default-format "orgtbl-to-csv"
org-clock-persist 'history
org-clock-sound "/usr/local/lib/alert1.wav"
org-todo-keywords '((sequence "TODO(t!)" "STARTED(s!)" "|" "DONE(d!/!)")
(sequence "WAITING(w@/!)" "SOMEDAY(S!)" "OPEN(O@)" "|" "CANCELLED(c@/!)")
(sequence "QUOTE(q!)" "QUOTED(Q!)" "|" "APPROVED(A@)" "EXPIRED(E@)"
"REJECTED(R@)")
)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-default-notes-file "~/git/org/refile.org"
org-export-docbook-xslt-proc-command "xsltproc --output %s /usr/share/xml/docbook/stylesheet/nwalsh/fo/docbook.xsl %s"
org-insert-heading-hook '(bh/insert-inactive-timestamp)
org-tag-alist '((:startgroup) ("@errand" . 101) ("@office" . 111) ("@home" . 104) ("@farm" . 102)
(:endgroup) ("PHONE" . 112) ("QUOTE" . 113) ("NEXT" . 110) ("WAITING" . 119)
("HOME" . 72) ("FARM" . 70) ("ORG" . 79) ("JOBS" . 74) ("SAPPI" . 83)
("NORANG" . 78) ("crypt" . 101) ("inet" . 105) ("MARK" . 77) ("BZFLAG" . 66))
org-blank-before-new-entry '((heading) (plain-list-item))
org-habit-graph-column 50
org-export-html-inline-images t
org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-export-latex-classes '(("myletter"
"% BEGIN My Letter Defaults\n\\documentclass[10pt,letterpaper]{letter}\n\\usepackage[letterpaper,includeheadfoot,top=0.5in,bottom=0.5in,left=0.75in,right=0.75in]{geometry}\n\\usepackage[utf8]{inputenc}\n\\usepackage[T1]{fontenc}\n\\usepackage{hyperref}\n\\usepackage{lastpage}\n\\usepackage{fancyhdr}\n\\pagestyle{fancy}\n\\renewcommand{\\footrulewidth}{0.5pt}\n\n% Default footer\n\\fancyfoot[C]{\\small Page \\thepage\\ of \\pageref{LastPage}}\n% END My Letter Defaults\n\n"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("myarticle"
"% BEGIN My Article Defaults\n\\documentclass[10pt,letterpaper]{article}\n\\usepackage[letterpaper,includeheadfoot,top=0.5in,bottom=0.5in,left=0.75in,right=0.75in]{geometry}\n\\usepackage[utf8]{inputenc}\n\\usepackage[T1]{fontenc}\n\\usepackage{hyperref}\n\\usepackage{lastpage}\n\\usepackage{fancyhdr}\n\\pagestyle{fancy}\n\\renewcommand{\\headrulewidth}{1pt}\n\\renewcommand{\\footrulewidth}{0.5pt}\n\n% Default footer\n\\fancyfoot[L]{\\small \\jobname \\\\ \\today}\n\\fancyfoot[C]{\\small Page \\thepage\\ of \\pageref{LastPage}}\n\\fancyfoot[R]{\\small \\copyright \\the\\year\\ Norang Consulting Inc.}\n% END My Article Defaults\n\n"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("article"
"\\documentclass[11pt,letterpaper]{article}\n\\usepackage[utf8]{inputenc}\n\\usepackage[T1]{fontenc}\n\\usepackage{graphicx}\n\\usepackage{hyperref}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("report"
"\\documentclass[11pt,letterpaper]{report}\n\\usepackage[utf8]{inputenc}\n\\usepackage[T1]{fontenc}\n\\usepackage{graphicx}\n\\usepackage{hyperref}"
("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
("book"
"\\documentclass[11pt,letterpaper]{book}\n\\usepackage[utf8]{inputenc}\n\\usepackage[T1]{fontenc}\n\\usepackage{graphicx}\n\\usepackage{hyperref}"
("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
)
org-publish-project-alist '(("norang-org" :base-directory "~/git/www.norang.ca"
:publishing-directory "/ssh:www-data@www:~/www.norang.ca/htdocs"
:recursive t :section_numbers nil :table-of-contents nil
:base-extension "org" :publishing-function org-publish-org-to-html
:style-include-default nil :section-numbers nil :table-of-contents nil
:style-include-default nil :style
"<link rel=\"stylesheet\" href=\"norang.css\" type=\"text/css\" />"
:author-info nil :creator-info nil)
("norang-extra" :base-directory "~/git/www.norang.ca/"
:publishing-directory "/ssh:www-data@www:~/www.norang.ca/htdocs"
:base-extension "css\\|pdf\\|png\\|jpg\\|gif" :publishing-function
org-publish-attachment :recursive t :author nil)
("norang" :components ("norang-org" "norang-extra"))
("doc-org" :base-directory "~/git/doc.norang.ca/" :publishing-directory
"/ssh:www-data@www:~/doc.norang.ca/htdocs" :recursive t
:section_numbers nil :table-of-contents nil :base-extension "org"
:publishing-function (org-publish-org-to-html org-publish-org-to-org)
:plain-source t :htmlized-source t :style-include-default nil :style
"<link rel=\"stylesheet\" href=\"/org.css\" type=\"text/css\" />"
:author-info nil :creator-info nil)
("doc-extra" :base-directory "~/git/doc.norang.ca/"
:publishing-directory "/ssh:www-data@www:~/doc.norang.ca/htdocs"
:base-extension "css\\|pdf\\|png\\|jpg\\|gif" :publishing-function
org-publish-attachment :recursive t :author nil)
("org" :base-directory "~/git/org/" :publishing-directory
"/ssh:www-data@www:~/org" :recursive t :section_numbers nil
:table-of-contents nil :base-extension "org" :publishing-function
org-publish-org-to-html :style-include-default nil :style
"<link rel=\"stylesheet\" href=\"/org.css\" type=\"text/css\" />"
:author-info nil :creator-info nil)
("doc-org-mode" :base-directory "~/git/org-mode-doc/"
:publishing-directory "/ssh:www-data@www:~/doc.norang.ca/htdocs"
:recursive t :section_numbers nil :table-of-contents nil
:base-extension "org" :publishing-function
(org-publish-org-to-html org-publish-org-to-org) :plain-source t
:htmlized-source t :style-include-default nil :style
"<link rel=\"stylesheet\" href=\"/org.css\" type=\"text/css\" />"
:author-info nil :creator-info nil)
("doc-org-mode-extra" :base-directory "~/git/org-mode-doc/"
:publishing-directory "/ssh:www-data@www:~/doc.norang.ca/htdocs"
:base-extension "css\\|pdf\\|png\\|jpg\\|gif" :publishing-function
org-publish-attachment :recursive t :author nil)
("doc" :components
("doc-org" "doc-extra" "doc-org-mode" "doc-org-mode-extra"))
)
org-agenda-tags-todo-honor-ignore-options t
org-use-speed-commands t
org-mode-hook '(org-clock-load
(lambda nil (make-variable-buffer-local (quote yas/trigger-key))
(org-set-local (quote yas/trigger-key) [tab])
(define-key yas/keymap [tab] (quote yas/next-field-group)) (flyspell-mode 1))
#[nil "\300\301\302\303\304$\207"
[add-hook before-save-hook org-encrypt-entries nil t] 5]
#[nil "\300\301\302\303\304$\207"
[org-add-hook change-major-mode-hook org-show-block-all append local] 5]
)
org-clock-out-remove-zero-time-clocks t
org-cycle-include-plain-lists nil
org-font-lock-hook '(org-inlinetask-fontify)
org-agenda-ndays 1
org-global-properties '(("Effort_ALL" .
"0:10 0:30 1:00 2:00 4:00 6:00 8:00 12:00 16:00 24:00 40:00")
("STYLE_ALL" . "habit"))
org-refile-targets '((nil :maxlevel . 5) (org-agenda-files :maxlevel . 5))
org-ctrl-c-ctrl-c-hook '(org-babel-lob-execute-maybe org-babel-execute-src-block-maybe)
org-return-follows-link t
org-confirm-elisp-link-function 'yes-or-no-p
org-refile-use-outline-path 'file
org-fast-tag-selection-single-key 'expert
org-log-into-drawer t
org-agenda-mode-hook '((lambda nil (hl-line-mode 1)))
org-agenda-start-on-weekday nil
org-agenda-todo-ignore-with-date t
org-export-interblocks '((lob org-babel-exp-lob-one-liners) (src org-babel-exp-inline-src-blocks))
org-enforce-todo-dependencies t
org-agenda-skip-deadline-if-done t
org-show-following-heading t
org-insert-heading-respect-content t
org-crypt-key "F0B66B40"
org-occur-hook '(org-first-headline-recenter)
org-from-is-user-regexp "\\<Bernt Hansen\\>"
org-yank-adjusted-subtrees t
org-drawers '("PROPERTIES" "LOGBOOK" "CLOCK")
org-agenda-log-mode-items '(clock)
org-treat-S-cursor-todo-selection-as-state-change nil
org-export-docbook-xsl-fo-proc-command "fop %s %s"
org-agenda-todo-ignore-deadlines t
org-modules '(org-bbdb org-bibtex org-crypt org-gnus org-id org-info org-jsinfo org-habit
org-inlinetask org-irc org-mew org-mhe org-protocol org-rmail org-vm org-wl org-w3m)
org-columns-default-format "%80ITEM(Task) %10Effort(Estimated Effort){:} %10CLOCKSUM"
org-agenda-auto-exclude-function 'bh/org-auto-exclude-function
org-remember-templates '(("todo" 116 "* TODO %?\n %U\n %a" nil bottom nil)
("note" 110
"* %? :NOTE:\n %U\n %a" nil
bottom nil)
("phone" 112
"* PHONE %:name - %:company - :PHONE:\n Contact Info: %a\n %U\n :CLOCK-IN:\n %?" nil bottom nil)
("Apply to Job" 106
"* TODO jobtask%? :NEXT:inet:\n :PROPERTIES:\n :Effort: 0:30\n :END:\n %U\n jobdetails" "~/git/org/jobs.org" "TODO Job Search" nil)
("appointment" 97 "* %?\n %U" "~/git/org/todo.org" "Appointments" nil)
("Search job site" 115
"* TODO Search job site%! :NEXT:inet:\n %U\n :PROPERTIES:\n :Effort: 0:10\n :END:\n %a " "~/git/org/jobs.org" "Search Jobs" nil)
("org-protocol" 119
"* TODO Review %c%! :NEXT:\n %U\n :PROPERTIES:\n :Effort: 0:10\n :END:" nil bottom nil)
)
org-export-preprocess-after-tree-selection-hook '(org-inlinetask-export-handler)
org-export-docbook-final-hook '(org-inlinetask-remove-terminator)
org-export-latex-final-hook '(org-inlinetask-remove-terminator)
org-lowest-priority 71
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-clock-idle-time 1
org-export-blocks '((src org-babel-exp-src-blocks nil) (comment org-export-blocks-format-comment t)
(ditaa org-export-blocks-format-ditaa nil)
(dot org-export-blocks-format-dot nil))
)
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry
2009-11-09 17:12 Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry Bernt Hansen
@ 2009-11-09 19:30 ` Bernt Hansen
2009-11-09 21:37 ` Carsten Dominik
0 siblings, 1 reply; 7+ messages in thread
From: Bernt Hansen @ 2009-11-09 19:30 UTC (permalink / raw)
To: emacs-orgmode
Bernt Hansen <bernt@norang.ca> writes:
> Remember to cover the basics, that is, what you expected to happen and
> what in fact did happen. You don't know how to make a good report? See
>
> http://orgmode.org/manual/Feedback.html#Feedback
>
> Your bug report will be posted to the Org-mode mailing list.
> ------------------------------------------------------------------------
>
> Clocking out of a task moves point to the clock entry being closed.
> This makes my workaround for clocking in a new task (just use a speed
> key O to clock out and I to clock in) fail since we jump away from the
> task that I want to clock in.
>
> Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11)
> of 2008-11-09 on raven, modified by Debian
> Package: Org-mode version 6.32trans (release_6.32b.127.g471c2)
Reverting this commit seems to fix it
7c0a16e (Use with-current-buffer instead of save-excursion set-buffer where possible, 2009-11-05)
-Bernt
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Re: Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry
2009-11-09 19:30 ` Bernt Hansen
@ 2009-11-09 21:37 ` Carsten Dominik
2009-11-09 21:42 ` Bernt Hansen
2009-11-09 21:53 ` Bernt Hansen
0 siblings, 2 replies; 7+ messages in thread
From: Carsten Dominik @ 2009-11-09 21:37 UTC (permalink / raw)
To: Bernt Hansen; +Cc: emacs-orgmode
Hi Bernt,
could I ask you to only revert that patch in org-clock.el and
see if that is enought to fix it?
- Carsten
On Nov 9, 2009, at 8:30 PM, Bernt Hansen wrote:
> Bernt Hansen <bernt@norang.ca> writes:
>
>> Remember to cover the basics, that is, what you expected to happen
>> and
>> what in fact did happen. You don't know how to make a good
>> report? See
>>
>> http://orgmode.org/manual/Feedback.html#Feedback
>>
>> Your bug report will be posted to the Org-mode mailing list.
>> ------------------------------------------------------------------------
>>
>> Clocking out of a task moves point to the clock entry being closed.
>> This makes my workaround for clocking in a new task (just use a speed
>> key O to clock out and I to clock in) fail since we jump away from
>> the
>> task that I want to clock in.
>>
>> Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11)
>> of 2008-11-09 on raven, modified by Debian
>> Package: Org-mode version 6.32trans (release_6.32b.127.g471c2)
>
> Reverting this commit seems to fix it
> 7c0a16e (Use with-current-buffer instead of save-excursion set-
> buffer where possible, 2009-11-05)
>
> -Bernt
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
- Carsten
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry
2009-11-09 21:37 ` Carsten Dominik
@ 2009-11-09 21:42 ` Bernt Hansen
2009-11-09 21:53 ` Bernt Hansen
1 sibling, 0 replies; 7+ messages in thread
From: Bernt Hansen @ 2009-11-09 21:42 UTC (permalink / raw)
To: Carsten Dominik; +Cc: emacs-orgmode
Okay - I'll get back to you on that.
Carsten Dominik <carsten.dominik@gmail.com> writes:
> Hi Bernt,
>
> could I ask you to only revert that patch in org-clock.el and
> see if that is enought to fix it?
>
> - Carsten
>
>
> On Nov 9, 2009, at 8:30 PM, Bernt Hansen wrote:
>
>> Bernt Hansen <bernt@norang.ca> writes:
>>
>>> Remember to cover the basics, that is, what you expected to happen
>>> and
>>> what in fact did happen. You don't know how to make a good
>>> report? See
>>>
>>> http://orgmode.org/manual/Feedback.html#Feedback
>>>
>>> Your bug report will be posted to the Org-mode mailing list.
>>> ------------------------------------------------------------------------
>>>
>>> Clocking out of a task moves point to the clock entry being closed.
>>> This makes my workaround for clocking in a new task (just use a speed
>>> key O to clock out and I to clock in) fail since we jump away from
>>> the
>>> task that I want to clock in.
>>>
>>> Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11)
>>> of 2008-11-09 on raven, modified by Debian
>>> Package: Org-mode version 6.32trans (release_6.32b.127.g471c2)
>>
>> Reverting this commit seems to fix it
>> 7c0a16e (Use with-current-buffer instead of save-excursion set-
>> buffer where possible, 2009-11-05)
>>
>> -Bernt
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Remember: use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>
> - Carsten
>
>
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry
2009-11-09 21:37 ` Carsten Dominik
2009-11-09 21:42 ` Bernt Hansen
@ 2009-11-09 21:53 ` Bernt Hansen
2009-11-09 21:55 ` Carsten Dominik
1 sibling, 1 reply; 7+ messages in thread
From: Bernt Hansen @ 2009-11-09 21:53 UTC (permalink / raw)
To: Carsten Dominik; +Cc: emacs-orgmode
Reverting just the org-clock.el patches seems to fix it too.
-Bernt
--8<---------------cut here---------------start------------->8---
commit 01b1eb143f027bc6cdf54d95bd15fc03f2e03208
Author: Bernt Hansen <bernt@norang.ca>
Date: Mon Nov 9 14:27:03 2009 -0500
Revert part of "Use with-current-buffer instead of save-excursion set-buffer where possible"
This reverts the clocking changes in commit 7c0a16e2566e1cc3bb3c9f6b7571efe21f323a3c.
diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index fc1e977..29cdf83 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -1103,7 +1103,8 @@ If there is no running clock, throw an error, unless FAIL-QUIETLY is set."
(if (not (marker-buffer org-clock-marker))
(if fail-quietly (throw 'exit t) (error "No active clock")))
(let (ts te s h m remove)
- (with-current-buffer (marker-buffer org-clock-marker)
+ (save-excursion
+ (set-buffer (marker-buffer org-clock-marker))
(save-restriction
(widen)
(goto-char org-clock-marker)
@@ -1168,7 +1169,8 @@ If there is no running clock, throw an error, unless FAIL-QUIETLY is set."
(interactive)
(if (not (marker-buffer org-clock-marker))
(error "No active clock"))
- (with-current-buffer (marker-buffer org-clock-marker)
+ (save-excursion
+ (set-buffer (marker-buffer org-clock-marker))
(goto-char org-clock-marker)
(delete-region (1- (point-at-bol)) (point-at-eol))
;; Just in case, remove any empty LOGBOOK left over
--8<---------------cut here---------------end--------------->8---
Carsten Dominik <carsten.dominik@gmail.com> writes:
> Hi Bernt,
>
> could I ask you to only revert that patch in org-clock.el and
> see if that is enought to fix it?
>
> - Carsten
>
>
> On Nov 9, 2009, at 8:30 PM, Bernt Hansen wrote:
>
>> Bernt Hansen <bernt@norang.ca> writes:
>>
>>> Remember to cover the basics, that is, what you expected to happen
>>> and
>>> what in fact did happen. You don't know how to make a good
>>> report? See
>>>
>>> http://orgmode.org/manual/Feedback.html#Feedback
>>>
>>> Your bug report will be posted to the Org-mode mailing list.
>>> ------------------------------------------------------------------------
>>>
>>> Clocking out of a task moves point to the clock entry being closed.
>>> This makes my workaround for clocking in a new task (just use a speed
>>> key O to clock out and I to clock in) fail since we jump away from
>>> the
>>> task that I want to clock in.
>>>
>>> Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11)
>>> of 2008-11-09 on raven, modified by Debian
>>> Package: Org-mode version 6.32trans (release_6.32b.127.g471c2)
>>
>> Reverting this commit seems to fix it
>> 7c0a16e (Use with-current-buffer instead of save-excursion set-
>> buffer where possible, 2009-11-05)
>>
>> -Bernt
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Remember: use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>
> - Carsten
>
>
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
^ permalink raw reply related [flat|nested] 7+ messages in thread
* Re: Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry
2009-11-09 21:53 ` Bernt Hansen
@ 2009-11-09 21:55 ` Carsten Dominik
2009-11-09 22:00 ` Bernt Hansen
0 siblings, 1 reply; 7+ messages in thread
From: Carsten Dominik @ 2009-11-09 21:55 UTC (permalink / raw)
To: Bernt Hansen; +Cc: emacs-orgmode
Hmmm.
I do not understand why this makes a difference, but I will make these
changes. Thanks a lot.
This was on of the big-sweep changes that happen in Emacs all the
time, where someone thinks we should use this and that style.
This looked trivial, so I accepted the changes. Too early it seems.
- Carsten
On Nov 9, 2009, at 10:53 PM, Bernt Hansen wrote:
> Reverting just the org-clock.el patches seems to fix it too.
>
> -Bernt
>
> --8<---------------cut here---------------start------------->8---
> commit 01b1eb143f027bc6cdf54d95bd15fc03f2e03208
> Author: Bernt Hansen <bernt@norang.ca>
> Date: Mon Nov 9 14:27:03 2009 -0500
>
> Revert part of "Use with-current-buffer instead of save-excursion
> set-buffer where possible"
>
> This reverts the clocking changes in commit
> 7c0a16e2566e1cc3bb3c9f6b7571efe21f323a3c.
>
> diff --git a/lisp/org-clock.el b/lisp/org-clock.el
> index fc1e977..29cdf83 100644
> --- a/lisp/org-clock.el
> +++ b/lisp/org-clock.el
> @@ -1103,7 +1103,8 @@ If there is no running clock, throw an error,
> unless FAIL-QUIETLY is set."
> (if (not (marker-buffer org-clock-marker))
> (if fail-quietly (throw 'exit t) (error "No active clock")))
> (let (ts te s h m remove)
> - (with-current-buffer (marker-buffer org-clock-marker)
> + (save-excursion
> + (set-buffer (marker-buffer org-clock-marker))
> (save-restriction
> (widen)
> (goto-char org-clock-marker)
> @@ -1168,7 +1169,8 @@ If there is no running clock, throw an error,
> unless FAIL-QUIETLY is set."
> (interactive)
> (if (not (marker-buffer org-clock-marker))
> (error "No active clock"))
> - (with-current-buffer (marker-buffer org-clock-marker)
> + (save-excursion
> + (set-buffer (marker-buffer org-clock-marker))
> (goto-char org-clock-marker)
> (delete-region (1- (point-at-bol)) (point-at-eol))
> ;; Just in case, remove any empty LOGBOOK left over
> --8<---------------cut here---------------end--------------->8---
>
>
> Carsten Dominik <carsten.dominik@gmail.com> writes:
>
>> Hi Bernt,
>>
>> could I ask you to only revert that patch in org-clock.el and
>> see if that is enought to fix it?
>>
>> - Carsten
>>
>>
>> On Nov 9, 2009, at 8:30 PM, Bernt Hansen wrote:
>>
>>> Bernt Hansen <bernt@norang.ca> writes:
>>>
>>>> Remember to cover the basics, that is, what you expected to happen
>>>> and
>>>> what in fact did happen. You don't know how to make a good
>>>> report? See
>>>>
>>>> http://orgmode.org/manual/Feedback.html#Feedback
>>>>
>>>> Your bug report will be posted to the Org-mode mailing list.
>>>> ------------------------------------------------------------------------
>>>>
>>>> Clocking out of a task moves point to the clock entry being closed.
>>>> This makes my workaround for clocking in a new task (just use a
>>>> speed
>>>> key O to clock out and I to clock in) fail since we jump away from
>>>> the
>>>> task that I want to clock in.
>>>>
>>>> Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11)
>>>> of 2008-11-09 on raven, modified by Debian
>>>> Package: Org-mode version 6.32trans (release_6.32b.127.g471c2)
>>>
>>> Reverting this commit seems to fix it
>>> 7c0a16e (Use with-current-buffer instead of save-excursion set-
>>> buffer where possible, 2009-11-05)
>>>
>>> -Bernt
>>>
>>>
>>> _______________________________________________
>>> Emacs-orgmode mailing list
>>> Remember: use `Reply All' to send replies to the list.
>>> Emacs-orgmode@gnu.org
>>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>> - Carsten
>>
>>
>>
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Remember: use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
- Carsten
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry
2009-11-09 21:55 ` Carsten Dominik
@ 2009-11-09 22:00 ` Bernt Hansen
0 siblings, 0 replies; 7+ messages in thread
From: Bernt Hansen @ 2009-11-09 22:00 UTC (permalink / raw)
To: Carsten Dominik; +Cc: emacs-orgmode
I think it's because in my case I have two tasks in the same file I'm
clocking in.
* STARTED first clocking task
...
* TODO second clocking task
and updating the first clocking task moves the point in the buffer on me
so I lose my place (at the second clocking task). So clocking in the
second task while the first is clocking just moves point to first task,
clocks it out, then clocks it in again (since the point moved)
Does that make sense?
-Bernt
Carsten Dominik <carsten.dominik@gmail.com> writes:
> Hmmm.
>
> I do not understand why this makes a difference, but I will make these
> changes. Thanks a lot.
>
> This was on of the big-sweep changes that happen in Emacs all the
> time, where someone thinks we should use this and that style.
>
> This looked trivial, so I accepted the changes. Too early it seems.
>
> - Carsten
>
> On Nov 9, 2009, at 10:53 PM, Bernt Hansen wrote:
>
>> Reverting just the org-clock.el patches seems to fix it too.
>>
>> -Bernt
>>
>> --8<---------------cut here---------------start------------->8---
>> commit 01b1eb143f027bc6cdf54d95bd15fc03f2e03208
>> Author: Bernt Hansen <bernt@norang.ca>
>> Date: Mon Nov 9 14:27:03 2009 -0500
>>
>> Revert part of "Use with-current-buffer instead of save-excursion
>> set-buffer where possible"
>>
>> This reverts the clocking changes in commit
>> 7c0a16e2566e1cc3bb3c9f6b7571efe21f323a3c.
>>
>> diff --git a/lisp/org-clock.el b/lisp/org-clock.el
>> index fc1e977..29cdf83 100644
>> --- a/lisp/org-clock.el
>> +++ b/lisp/org-clock.el
>> @@ -1103,7 +1103,8 @@ If there is no running clock, throw an error,
>> unless FAIL-QUIETLY is set."
>> (if (not (marker-buffer org-clock-marker))
>> (if fail-quietly (throw 'exit t) (error "No active clock")))
>> (let (ts te s h m remove)
>> - (with-current-buffer (marker-buffer org-clock-marker)
>> + (save-excursion
>> + (set-buffer (marker-buffer org-clock-marker))
>> (save-restriction
>> (widen)
>> (goto-char org-clock-marker)
>> @@ -1168,7 +1169,8 @@ If there is no running clock, throw an error,
>> unless FAIL-QUIETLY is set."
>> (interactive)
>> (if (not (marker-buffer org-clock-marker))
>> (error "No active clock"))
>> - (with-current-buffer (marker-buffer org-clock-marker)
>> + (save-excursion
>> + (set-buffer (marker-buffer org-clock-marker))
>> (goto-char org-clock-marker)
>> (delete-region (1- (point-at-bol)) (point-at-eol))
>> ;; Just in case, remove any empty LOGBOOK left over
>> --8<---------------cut here---------------end--------------->8---
>>
>>
>> Carsten Dominik <carsten.dominik@gmail.com> writes:
>>
>>> Hi Bernt,
>>>
>>> could I ask you to only revert that patch in org-clock.el and
>>> see if that is enought to fix it?
>>>
>>> - Carsten
>>>
>>>
>>> On Nov 9, 2009, at 8:30 PM, Bernt Hansen wrote:
>>>
>>>> Bernt Hansen <bernt@norang.ca> writes:
>>>>
>>>>> Remember to cover the basics, that is, what you expected to happen
>>>>> and
>>>>> what in fact did happen. You don't know how to make a good
>>>>> report? See
>>>>>
>>>>> http://orgmode.org/manual/Feedback.html#Feedback
>>>>>
>>>>> Your bug report will be posted to the Org-mode mailing list.
>>>>> ------------------------------------------------------------------------
>>>>>
>>>>> Clocking out of a task moves point to the clock entry being closed.
>>>>> This makes my workaround for clocking in a new task (just use a
>>>>> speed
>>>>> key O to clock out and I to clock in) fail since we jump away from
>>>>> the
>>>>> task that I want to clock in.
>>>>>
>>>>> Emacs : GNU Emacs 22.2.1 (i486-pc-linux-gnu, GTK+ Version 2.12.11)
>>>>> of 2008-11-09 on raven, modified by Debian
>>>>> Package: Org-mode version 6.32trans (release_6.32b.127.g471c2)
>>>>
>>>> Reverting this commit seems to fix it
>>>> 7c0a16e (Use with-current-buffer instead of save-excursion set-
>>>> buffer where possible, 2009-11-05)
>>>>
>>>> -Bernt
>>>>
>>>>
>>>> _______________________________________________
>>>> Emacs-orgmode mailing list
>>>> Remember: use `Reply All' to send replies to the list.
>>>> Emacs-orgmode@gnu.org
>>>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>>
>>> - Carsten
>>>
>>>
>>>
>>>
>>>
>>> _______________________________________________
>>> Emacs-orgmode mailing list
>>> Remember: use `Reply All' to send replies to the list.
>>> Emacs-orgmode@gnu.org
>>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>
> - Carsten
^ permalink raw reply [flat|nested] 7+ messages in thread
end of thread, other threads:[~2009-11-09 22:00 UTC | newest]
Thread overview: 7+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2009-11-09 17:12 Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking out moves point to clock entry Bernt Hansen
2009-11-09 19:30 ` Bernt Hansen
2009-11-09 21:37 ` Carsten Dominik
2009-11-09 21:42 ` Bernt Hansen
2009-11-09 21:53 ` Bernt Hansen
2009-11-09 21:55 ` Carsten Dominik
2009-11-09 22:00 ` Bernt Hansen
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).