From: Carsten Dominik <dominik@uva.nl>
To: Bernt Hansen <bernt@norang.ca>
Cc: Org-Mode List <emacs-orgmode@gnu.org>
Subject: Re: Support (or not) for Emacs 21, and XEmacs
Date: Sat, 17 Apr 2010 00:02:45 +0200 [thread overview]
Message-ID: <5C203EAD-54CB-47BB-97BC-0E5895EEC4E7@uva.nl> (raw)
In-Reply-To: <87vdbryzs1.fsf@gollum.intra.norang.ca>
Fixed, thanks
- Carsten
On Apr 16, 2010, at 9:15 PM, Bernt Hansen wrote:
> Another bug.
>
> Attempting to get a clock report in the agenda. (R in the daily
> agenda)
>
> -Bernt
>
> Debugger entered--Lisp error: (void-function org-dblock-write:)
> org-dblock-write:((:name nil :link nil :maxlevel 2 :tstart
> 733878 :tend 733879 :scope agenda :indentation-column 0 :content
> "\n"))
> funcall(org-dblock-write: (:name nil :link nil :maxlevel 2 :tstart
> 733878 :tend 733879 :scope agenda :indentation-column 0 :content
> "\n"))
> (let* ((pos ...) (line ...) (params ...) (name ...) (indent ...)
> (cmd ...)) (message "Updating dynamic block `%s' at line %d..." name
> line) (funcall cmd params) (message "Updating dynamic block `%s' at
> line %d...done" name line) (goto-char pos) (when (and indent ...)
> (setq indent ...) (save-excursion ... ... ... ...)))
> (save-window-excursion (let* (... ... ... ... ... ...) (message
> "Updating dynamic block `%s' at line %d..." name line) (funcall cmd
> params) (message "Updating dynamic block `%s' at line %d...done"
> name line) (goto-char pos) (when ... ... ...)))
> org-update-dblock()
> (save-current-buffer (set-buffer temp-buffer) (org-mode) (org-
> create-dblock props) (org-update-dblock) (font-lock-fontify-buffer)
> (forward-line 2) (buffer-substring (point) (progn ... ...)))
> (with-current-buffer temp-buffer (org-mode) (org-create-dblock
> props) (org-update-dblock) (font-lock-fontify-buffer) (forward-line
> 2) (buffer-substring (point) (progn ... ...)))
> (unwind-protect (with-current-buffer temp-buffer (org-mode) (org-
> create-dblock props) (org-update-dblock) (font-lock-fontify-buffer)
> (forward-line 2) (buffer-substring ... ...)) (and (buffer-name temp-
> buffer) (kill-buffer temp-buffer)))
> (let ((temp-buffer ...)) (unwind-protect (with-current-buffer temp-
> buffer ... ... ... ... ... ...) (and ... ...)))
> (with-temp-buffer (org-mode) (org-create-dblock props) (org-update-
> dblock) (font-lock-fontify-buffer) (forward-line 2) (buffer-
> substring (point) (progn ... ...)))
> org-get-clocktable(:link nil :maxlevel 2 :tstart 733878 :tend
> 733879 :scope agenda)
> apply(org-get-clocktable (:link nil :maxlevel 2 :tstart
> 733878 :tend 733879 :scope agenda))
> (setq tbl (apply (quote org-get-clocktable) p))
> (let ((org-agenda-files ...) (p org-agenda-clockreport-parameter-
> plist) tbl) (setq p (org-plist-delete p :block)) (setq p (plist-put
> p :tstart clocktable-start)) (setq p (plist-put p :tend clocktable-
> end)) (setq p (plist-put p :scope ...)) (setq tbl (apply ... p))
> (insert tbl))
> (progn (let (... ... tbl) (setq p ...) (setq p ...) (setq p ...)
> (setq p ...) (setq tbl ...) (insert tbl)))
> (if (and org-agenda-clockreport-mode clocktable-start) (progn
> (let ... ... ... ... ... ... ...)))
> (when (and org-agenda-clockreport-mode clocktable-start) (let
> (... ... tbl) (setq p ...) (setq p ...) (setq p ...) (setq p ...)
> (setq tbl ...) (insert tbl)))
> (let* ((org-agenda-start-on-weekday ...) (thefiles ...) (files
> thefiles) (today ...) (sd ...) (start ...) (day-numbers ...) (day-
> cnt 0) (inhibit-redisplay ...) s e rtn rtnall file date d start-pos
> end-pos todayp nd wd clocktable-start clocktable-end) (setq org-
> agenda-redo-command (list ... ... start-day ndays)) (setq ndays (or
> ndays org-agenda-ndays) nd ndays) (while (> ndays 1) (push ... day-
> numbers) (setq ndays ...)) (setq day-numbers (nreverse day-numbers))
> (setq clocktable-start (car day-numbers) clocktable-end (1+ ...))
> (org-prepare-agenda "Day/Week") (org-set-local (quote org-starting-
> day) (car day-numbers)) (org-set-local (quote org-include-all-loc)
> include-all) (org-set-local (quote org-agenda-span) (org-agenda-
> ndays-to-span nd)) (when (and ... ...) (setq files thefiles rtnall
> nil) (while ... ...) (when rtnall ... ... ... ...)) (unless org-
> agenda-compact-blocks (let* ... ... ...) (add-text-properties
> s ... ...) (org-agenda-mark-header-line s)) (while (setq d ...)
> (setq date ... wd ... s ...) (if ... ... ...) (setq files thefiles
> rtnall nil) (while ... ...) (if org-agenda-include-diary ...)
> (if ... ...)) (when (and org-agenda-clockreport-mode clocktable-
> start) (let ... ... ... ... ... ... ...)) (goto-char (point-min))
> (or org-agenda-multi (org-fit-agenda-window)) (unless (and ... ...)
> (goto-char ...) (recenter -1) (if ... ...)) (goto-char (or start-pos
> 1)) (add-text-properties (point-min) (point-max) (quote ...)) (org-
> finalize-agenda) (setq buffer-read-only t) (message ""))
> org-agenda-list(nil nil 1)
> eval((org-agenda-list (quote nil) nil 1))
> (let nil (eval org-agenda-redo-command))
> eval((let nil (eval org-agenda-redo-command)))
> org-let(nil (eval org-agenda-redo-command))
> (let* ((org-agenda-keep-modes t) (filter org-agenda-filter)
> (preset ...) (cols org-agenda-columns-active) (line ...) (window-
> line ...) (lprops ...)) (put (quote org-agenda-filter) :preset-
> filter nil) (and cols (org-columns-quit)) (message "Rebuilding
> agenda buffer...") (org-let lprops (quote ...)) (setq org-agenda-
> undo-list nil org-agenda-pending-undo-list nil) (message "Rebuilding
> agenda buffer...done") (put (quote org-agenda-filter) :preset-filter
> preset) (and (or filter preset) (org-agenda-filter-apply filter))
> (and cols (interactive-p) (org-agenda-columns)) (org-goto-line line)
> (recenter window-line))
> org-agenda-redo()
> org-agenda-clockreport-mode()
> call-interactively(org-agenda-clockreport-mode)
>
>
> Carsten Dominik <dominik@uva.nl> writes:
>
>> On Apr 16, 2010, at 4:42 PM, Bernt Hansen wrote:
>>
>>> Thanks. I'll beat on it some more :)
>>
>> What a team! :-)
>>
>>>
>>> Regards,
>>> Bernt
>>>
>>> Carsten Dominik <dominik@uva.nl> writes:
>>>
>>>> Hi Bernt, thanks a lot for this report - I believe I know
>>>> what was causing this and have fixed it, still on that branch of
>>>> course.
>>>>
>>>> - Carsten
>>>>
>>>> On Apr 16, 2010, at 3:13 PM, Bernt Hansen wrote:
>>>>
>>>>> Found a bug.
>>>>>
>>>
>>> <snip>
>>>
>>>>> Clocking in doesn't work correctly.
>>>>>
>>>>> I have a task like this
>>>>>
>>>>> ,----[ x.org ]
>>>>> | * TODO foo
>>>>> | :CLOCK:
>>>>> | CLOCK: [2010-04-16 Fri 09:10]--[2010-04-16 Fri 09:11] => 0:01
>>>>> | :END:
>>>>> |
>>>>> | ** TODO Bar baz
>>>>> | [2010-04-16 Fri 09:10]
>>>>> `----
>>>>>
>>>>> if the parent task is clocking I can't clock in the subtask - the
>>>>> parent
>>>>> task continues to clock and the point is moved to the headline of
>>>>> the
>>>>> parent task. Same behaviour on both versions.
>>>>>
>>>>> Switching back to master until this is fixed since I can't
>>>>> function
>>>>> without working clocking :)
>>
>> - Carsten
>>
>>
>>
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Please use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
- Carsten
next prev parent reply other threads:[~2010-04-16 22:02 UTC|newest]
Thread overview: 31+ messages / expand[flat|nested] mbox.gz Atom feed top
2010-04-14 8:15 Support (or not) for Emacs 21, and XEmacs Carsten Dominik
2010-04-16 10:26 ` Carsten Dominik
2010-04-16 10:27 ` Carsten Dominik
2010-04-16 12:19 ` Matt Lundin
2010-04-16 16:41 ` Carsten Dominik
2010-04-16 13:03 ` Sebastian Rose
2010-04-16 13:13 ` Bernt Hansen
2010-04-16 14:39 ` Carsten Dominik
2010-04-16 14:42 ` Bernt Hansen
2010-04-16 14:42 ` Carsten Dominik
2010-04-16 19:15 ` Bernt Hansen
2010-04-16 22:02 ` Carsten Dominik [this message]
2010-04-16 13:32 ` Rémi Vanicat
2010-04-16 13:56 ` Sebastian Rose
2010-04-16 13:07 ` Jan Böcker
2010-04-16 13:47 ` Günter Kolousek
2010-04-17 15:39 ` Michael Sperber
2010-04-17 20:31 ` Carsten Dominik
2010-04-18 8:22 ` Michael Sperber
2010-04-18 14:03 ` Carsten Dominik
2010-04-19 11:00 ` Michael Sperber
2010-04-19 11:19 ` Michael Sperber
2010-04-19 15:51 ` Carsten Dominik
2010-04-19 15:54 ` Michael Sperber
2010-04-19 15:55 ` Carsten Dominik
2010-04-19 15:59 ` Carsten Dominik
2010-05-07 7:51 ` Carsten Dominik
2010-05-07 8:30 ` Michael Sperber
2010-05-07 9:21 ` Carsten Dominik
2010-04-23 15:50 ` Michael Sperber
2010-04-23 19:03 ` Carsten Dominik
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
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=5C203EAD-54CB-47BB-97BC-0E5895EEC4E7@uva.nl \
--to=dominik@uva.nl \
--cc=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 external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.