From: Hannes Schulz <schulz@ais.uni-bonn.de>
To: emacs-orgmode@gnu.org
Subject: Bug report: agenda column mode failure
Date: Thu, 30 Aug 2012 13:47:11 +0200 [thread overview]
Message-ID: <20120830114711.GA27437@bigcuda3.informatik.uni-bonn.de> (raw)
Hi everyone,
when I put my agenda in column mode, I would like to change
efforts and the like.
When I do some action it instantly drops out of column mode.
I'm using org-mode from git 7.9 (release_7.9-163-gdfe33f).
The same phenomenon occurs with a minimal config:
% ------------- minimal-org.el -----
(setq debug-on-error t
debug-on-signal nil
debug-on-quit nil)
(add-to-list 'load-path "~/checkout/git/org-mode/lisp")
(require 'org-install)
% ------------- minimal.org -----
#+PROPERTY: Effort_ALL 0 0:10 0:30 1:00 2:00 3:00 4:00 5:00 6:00 7:00
#+COLUMNS: %40ITEM(Task) %17Effort(Estimated Effort){:} %CLOCKSUM
* Heading
** TODO Task 1
SCHEDULED: <2012-08-30 Do>
** date
<2012-08-30 Do>
%------------end------------
I run like this:
$ emacs -Q -l minimal-org.el minimal.org
then I add minimal.org to the agenda files, create the agenda, put it in column
mode, and use shift-right in the effort column.
This yields the following backtrace:
Debugger entered--Lisp error: (error "Marker does not point anywhere")
goto-char(#<marker in no buffer>)
(save-excursion (goto-char beg) (setq end (condition-case nil ... ...)) (goto-char end) (while (re-search-backward re beg t) (setq sumpos ... last-level ... level ... val ... valflag ...) (cond ... ... ...)))
(let* ((re org-outline-regexp-bol) (lmax 30) (lvals ...) (lflag ...) (level 0) (ass ...) (format ...) (printf ...) (fun ...) (calc ...) (beg org-columns-top-level-marker) (inminlevel org-inlinetask-min-level) (last-level org-inlinetask-min-level) val valflag flag end sumpos sum-alist sum str str1 useval) (save-excursion (goto-char beg) (setq end ...) (goto-char end) (while ... ... ...)))
org-columns-compute("Effort")
(cond ((equal ... "CLOCKSUM") (org-clock-sum)) ((equal ... "CLOCKSUM_T") (org-clock-sum-today)) ((and ... ... ...) (org-columns-compute ...)))
(while (setq fm (pop fmt)) (cond (... ...) (... ...) (... ...)))
(save-restriction (widen) (org-unmodified (remove-text-properties ... ... ...)) (goto-char (point-min)) (org-columns-get-format-and-top-level) (while (setq fm ...) (cond ... ... ...)))
(save-excursion (save-restriction (widen) (org-unmodified ...) (goto-char ...) (org-columns-get-format-and-top-level) (while ... ...)))
(save-current-buffer (set-buffer (or ... b)) (save-excursion (save-restriction ... ... ... ... ...)))
(with-current-buffer (or (buffer-base-buffer b) b) (save-excursion (save-restriction ... ... ... ... ...)))
(while (setq f (pop files)) (setq b (find-buffer-visiting f)) (with-current-buffer (or ... b) (save-excursion ...)))
(let ((files org-agenda-contributing-files) (org-columns-begin-marker ...) (org-columns-top-level-marker ...) f fm a b) (while (setq f ...) (setq b ...) (with-current-buffer ... ...)))
org-agenda-colview-compute((("ITEM" "Task" 40 nil nil nil + nil) ("Effort" "Estimated Effort" 17 ":" add_times nil + nil) ("CLOCKSUM" "CLOCKSUM" nil nil nil nil + nil)))
(progn (org-agenda-colview-compute org-columns-current-fmt-compiled))
(if org-agenda-columns-compute-summary-properties (progn (org-agenda-colview-compute org-columns-current-fmt-compiled)))
(when org-agenda-columns-compute-summary-properties (org-agenda-colview-compute org-columns-current-fmt-compiled))
(let ((org-columns-time ...) cache maxwidths m p a d fmt) (cond (... ... ...) (... ...) (... ...) (... ... ...)) (setq fmt (or fmt org-columns-default-format)) (org-set-local (quote org-columns-current-fmt) fmt) (org-columns-compile-format fmt) (when org-agenda-columns-compute-summary-properties (org-agenda-colview-compute org-columns-current-fmt-compiled)) (save-excursion (goto-char ...) (while ... ... ...) (when cache ... ... ... ... ... ...)))
org-agenda-columns()
call-interactively(org-agenda-columns nil nil)
cheers,
-Hannes
next reply other threads:[~2012-08-30 11:47 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-08-30 11:47 Hannes Schulz [this message]
2012-08-31 1:52 ` Bug report: agenda column mode failure Jacob Riko
2012-08-31 2:33 ` Jacob Riko
2012-08-31 6:05 ` Bastien
2012-08-31 6:58 ` Jacob Riko
2012-08-31 8:19 ` Hannes Schulz
2012-08-31 9:24 ` Bastien
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=20120830114711.GA27437@bigcuda3.informatik.uni-bonn.de \
--to=schulz@ais.uni-bonn.de \
--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).