[O] Bug: Clocking in fails when there is a dangling clock [8.3.1 (8.3.1-16-gf6aa53-elpaplus @ d:/Users/clange/.emacs.d/elpa/org-plus-contrib-20150810/)]

[Christoph LANGE]

Dear Org-mode developers,

here is another regression in 8.3.1.

Steps to reproduce:

1. Assume a *.org file like this:

* Clock
  CLOCK: [2015-08-13 Thu 15:28]

2. With the point somewhere in this tree, run org-clock-in (C-c C-x C-i)

Expected behaviour: the dangling clock is recognised; Org-mode asks you
how you'd like to resolve it.

Actual behaviour:

Debugger entered--Lisp error: (wrong-type-argument stringp 2)
  regexp-quote(2)
  org-clock-jump-to-current-clock((#<marker (moves after insertion) at 
2840310 in default.org> 21964 39716))
  org-clock-resolve((#<marker (moves after insertion) at 2840310 in 
default.org> 21964 39716) #[(clock) "\301\302\303\304 
\304A!Z\305\"\"\207" [clock format "Dangling clock started %d mins ago" 
floor org-float-time 60] 6] (21964 39716))
  org-resolve-clocks()
  byte-code("<some byte code deleted for this email>" 
[org-clock-resolving-clocks-due-to-idleness org-clock-resolving-clocks 
org-clock-leftover-time leftover org--msg-extra target-pos 
org-clocking-p nil "" t org-resolve-clocks (64) org-clock-in (4) 
org-clock-select-task "Clock-in on task: " copy-marker error "Abort" 
(16) org-clock-mark-default-task org-back-to-heading marker-buffer 
marker-position 4 org-heading-components message "Clock continues in 
\"%s\"" throw abort org-clock-out org-at-heading-p point-at-bol 0 
org-base-buffer run-hooks org-clock-in-prepare-hook 
org-clock-history-push functionp looking-at match-string 2 org-todo "[ 
]*" "\\>" replace-regexp-in-string "\\[\\[.*?\\]\\[\\(.*?\\)\\]\\]" 
"\\1" match-string-no-properties "???" ...] 8)
  org-clock-in(nil)
  funcall-interactively(org-clock-in nil)
  call-interactively(org-clock-in nil nil)
  command-execute(org-clock-in)

Cheers,

Christoph

Emacs  : GNU Emacs 25.0.50.1 (x86_64-w64-mingw32)
 of 2015-08-08 on KAEL
Package: Org-mode version 8.3.1 (8.3.1-16-gf6aa53-elpaplus @ 
d:/Users/clange/.emacs.d/elpa/org-plus-contrib-20150810/)

current state:
==============
(setq
 org-id-locations-file "~\\.emacs.d\\.org-id-locations"
 org-tab-first-hook '(org-hide-block-toggle-maybe 
org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 org-clock-persist-file "~\\.emacs.d\\org-clock-save.el"
 org-speed-command-hook '(org-speed-command-default-hook 
org-babel-speed-command-hook)
 org-time-clocksum-format '(:hours "%d" :require-hours t :minutes 
":%02d" :require-minutes t)
 org-clock-history-length 20
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-clock-into-drawer 2
 org-confirm-shell-link-function 'yes-or-no-p
 org-id-link-to-org-use-id 'create-if-interactive-and-no-custom-id
 org-finalize-agenda-hook '(bh/org-agenda-to-appt)
 org-clock-idle-time 10
 org-agenda-sticky t
 org-file-apps '((auto-mode . emacs) ("\\.mm\\'" . default) 
("\\.x?html?\\'" . "firefox %s")
                 ("\\.pdf\\'" . "okular %s"))
 org-pretty-entities t
 org-return-follows-link t
 org-todo-keyword-faces '(("TODO" :foreground "DarkOrange1" :weight 
bold) ("MAYBE" :foreground "sea green")
                          ("DONE" :foreground "light sea green") 
("CANCELLED" :foreground "forest green")
                          ("TASK" :foreground "blue"))
 org-capture-templates '(("c" "Contacts" entry (file "...")
                          "* %^{Name}%^{CUSTOM_ID}p\n  %?")
                         ("w" "Log work task" entry (id 
"00fba618-a215-4d39-a8fd-88f1ffce1fdb")
                          "* %^{Description}  %^g%?" :prepend t 
:clock-in t :clock-keep t)
                         ("t" "TODO" entry (id 
"00fba618-a215-4d39-a8fd-88f1ffce1fdb")
                          "* TODO %^{Description}\n  DEADLINE: 
%^{DEADLINE}t" :prepend t :clock-in t :clock-resume t)
                         )
 org-agenda-include-diary t
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-from-is-user-regexp nil
 org-src-mode-hook '(org-src-babel-configure-edit-buffer 
org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(org-mode-reftex-setup org-clock-load evil-org-mode
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook 
org-show-block-all append local] 5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook 
org-babel-show-result-all append local] 5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes 
org-eldoc-load)
 org-goto-auto-isearch nil
 org-stuck-projects '("+prj/-MAYBE-DONE" ("TODO" "TASK") nil)
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-use-speed-commands t
 org-clock-persist 'history
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point 
org-babel-execute-safely-maybe)
 org-enforce-todo-dependencies 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-tags-exclude-from-inheritance '("prj")
 org-agenda-finalize-hook '(bh/org-agenda-to-appt)
 org-enforce-todo-checkbox-dependencies t
 org-modules '(org-bbdb org-bibtex org-docview org-gnus org-info 
org-jsinfo org-habit org-irc org-mew org-mhe
               org-rmail org-vm org-wl org-w3m)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-log-into-drawer t
 org-blocker-hook '(org-block-todo-from-checkboxes 
org-block-todo-from-children-or-siblings-or-parent)
 org-completion-use-ido t
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-clock-out-remove-zero-time-clocks t
 )

--
Dr. Christoph Lange, Enterprise Information Systems Department
Applied Computer Science @ University of Bonn; Fraunhofer IAIS
http://langec.wordpress.com/about, Skype duke4701

→ Web Intelligence Summer School “Question Answering with the Web”
  Saint-Étienne, FR.  Apply by 4 July @ https://wiss.univ-st-etienne.fr/