emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Bernt Hansen <bernt@norang.ca>
To: emacs-orgmode@gnu.org
Subject: Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking in with an open clock fails
Date: Mon, 9 Nov 2009 10:59:45 -0500	[thread overview]
Message-ID: <200911091559.nA9FxjQj025395@gollum.intra.norang.ca> (raw)


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.
------------------------------------------------------------------------

If there is an open clocking task and you move to another task and try
to clock that in org-mode used to close out the clocking task, and
clock in the new task.

This no longer works.  Now it closes out the clocking task and clocks
it right back in again.


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))
 )

             reply	other threads:[~2009-11-09 15:59 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2009-11-09 15:59 Bernt Hansen [this message]
2009-11-09 19:31 ` Org-mode version 6.32trans (release_6.32b.127.g471c2); Clocking in with an open clock fails Bernt Hansen

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=200911091559.nA9FxjQj025395@gollum.intra.norang.ca \
    --to=bernt@norang.ca \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
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).