Clock setup stopped working after update

[Markus Heller <hellerm2@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 2747 bytes --]

Hello,

I just updated emacs to GNU Emacs 25.1.1 (x86_64-w64-mingw32) of 2016-09-21
and orgmode to Org mode version 9.0.5 (9.0.5-elpa @
c:/Users/mheller/AppData/Roaming/.emacs.d/elpa/org-20170210/).

I've been using Bernt Hansen's clock setup for over a year now, without
issues.  I realize that this is not readily reproduced, but I'm hoping that
somebody will be able to spot what's going on based on experience.  So,
now, after this update, punching in after starting emacs results in an
error:

org-back-to-heading: Before first headline at position 1121 in buffer
*Messages*

Debugger:

Debugger entered--Lisp error: (error "Before first headline at position 71
in buffer *GNU Emacs*")
  signal(error ("Before first headline at position 71 in buffer *GNU
Emacs*"))
  error("Before first headline at position %d in buffer %s" 71 #<buffer
*GNU Emacs*>)
  org-back-to-heading(t)
  org-clock-mark-default-task()
  org-clock-in((16))
  (save-restriction (widen) (goto-char (or --mpom (point))) (org-clock-in
(quote (16))))
  (save-excursion (save-restriction (widen) (goto-char (or --mpom (point)))
(org-clock-in (quote (16)))))
  (save-excursion (if (markerp --mpom) (set-buffer (marker-buffer --mpom)))
(save-excursion (save-restriction (widen) (goto-char (or --mpom (point)))
(org-clock-in (quote (16))))))
  (let ((--mpom (org-id-find bh/organization-task-id (quote marker))))
(save-excursion (if (markerp --mpom) (set-buffer (marker-buffer --mpom)))
(save-excursion (save-restriction (widen) (goto-char (or --mpom (point)))
(org-clock-in (quote (16)))))))
  bh/clock-in-organization-task-as-default()
  (if (and (equal major-mode (quote org-mode)) (not
(org-before-first-heading-p)) (eq arg 4)) (org-clock-in (quote (16)))
(bh/clock-in-organization-task-as-default))
  (save-restriction (widen) (if (and (equal major-mode (quote org-mode))
(not (org-before-first-heading-p)) (eq arg 4)) (org-clock-in (quote (16)))
(bh/clock-in-organization-task-as-default)))
  (if (equal major-mode (quote org-agenda-mode)) (let* ((marker
(org-get-at-bol (quote org-hd-marker))) (tags (let ((--mpom marker))
(save-excursion (if (markerp --mpom) (set-buffer ...)) (save-excursion
(save-restriction ... ... ...)))))) (if (and (eq arg 4) tags)
(org-agenda-clock-in (quote (16))) (bh/clock-in-organization-task-as-default)))
(save-restriction (widen) (if (and (equal major-mode (quote org-mode)) (not
(org-before-first-heading-p)) (eq arg 4)) (org-clock-in (quote (16)))
(bh/clock-in-organization-task-as-default))))
  bh/punch-in(1)
  funcall-interactively(bh/punch-in 1)
  call-interactively(bh/punch-in nil nil)
  command-execute(bh/punch-in)

I did not change anything in my .emacs.  Is somebody able to give me a hint
as to what's going on?

Thanks
Markus

[-- Attachment #2: Type: text/html, Size: 3658 bytes --]