From: Alan Schmitt <alan.schmitt@polytechnique.org>
To: Matt Lundin <mdl@imapmail.org>
Cc: Daimrod <daimrod@gmail.com>, emacs-orgmode@gnu.org
Subject: Re: still seeing semi-regular lockups
Date: Fri, 27 Jun 2014 15:37:55 +0200 [thread overview]
Message-ID: <m2y4wieamk.fsf@top-wifi.irisa.fr> (raw)
In-Reply-To: <87vbrmwlxs.fsf@nicolasgoaziou.fr> (Nicolas Goaziou's message of "Fri, 27 Jun 2014 14:56:15 +0200")
[-- Attachment #1: Type: text/plain, Size: 2181 bytes --]
I've also just been bitten by this bug, as I was doing my weekly
review. I'll try to see if I can write an ECM, but for the record this
is what I was doing: I was in an agenda view sorted by the value of
a LAST_REVIEW property, and I was repeatedly calling this function on
the entries of the view:
#+begin_src emacs-lisp
(defun org-review-insert-last-review (&optional prompt)
"Insert the current date as last review. If prefix argument:
prompt the user for the date. If `org-review-sets-next-date' is
set to `t', also insert a next review date."
(interactive "P")
(let ((ts (if prompt
(concat "<" (org-read-date) ">")
(format-time-string (car org-time-stamp-formats)))))
(org-review-insert-date org-review-last-property-name
org-review-last-timestamp-format
ts)
(when org-review-sets-next-date
(org-review-insert-date
org-review-next-property-name
org-review-next-timestamp-format
(format-time-string (car org-time-stamp-formats)
(org-review-last-planned
ts
(or (org-review-review-delay-prop
(if (equal (buffer-name) org-agenda-buffer-name)
(or (org-get-at-bol 'org-marker)
(org-agenda-error))
(point)))
org-review-delay)))))))
#+end_src
the `org-review-insert-date` is defined as follows
#+begin_src emacs-lisp
(defun org-review-insert-date (propname fmt date)
"Insert the DATE under property PROPNAME, in the format
specified by FMT."
(org-entry-put
(if (equal (buffer-name) org-agenda-buffer-name)
(or (org-get-at-bol 'org-marker)
(org-agenda-error))
(point))
propname
(cond
((eq fmt 'inactive)
(concat "[" (substring date 1 -1) "]"))
((eq fmt 'active) date)
(t (substring date 1 -1)))))
#+end_src
I could get out of the loop using "ctrl-G" but any further interaction
with the todo buffer (expanding the task to see its properties, or
changing the todo state) would result in further lockup. Restarting
emacs let me do a few more entries (about a dozen) before it locked up
again.
Alan
--
OpenPGP Key ID : 040D0A3B4ED2E5C7
[-- Attachment #2: Type: application/pgp-signature, Size: 494 bytes --]
next prev parent reply other threads:[~2014-06-27 13:38 UTC|newest]
Thread overview: 70+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-05-14 8:39 still seeing semi-regular lockups Eric Abrahamsen
2014-05-15 9:21 ` Bastien
2014-05-15 9:30 ` Daimrod
2014-05-15 9:46 ` Bastien
2014-05-15 10:31 ` Eric Abrahamsen
2014-05-15 10:37 ` Daimrod
2014-05-15 10:43 ` Eric Abrahamsen
2014-05-19 14:21 ` Daimrod
2014-05-20 8:25 ` Eric Abrahamsen
2014-05-20 8:55 ` Daimrod
2014-05-20 11:16 ` Eric Abrahamsen
2014-06-24 8:48 ` Nicolas Goaziou
2014-06-24 14:28 ` Eric Abrahamsen
2014-06-25 4:09 ` Matt Lundin
2014-06-25 5:39 ` Matt Lundin
2014-06-25 7:32 ` Sebastien Vauban
2014-06-27 13:00 ` Nicolas Goaziou
2014-06-25 7:38 ` Daimrod
2014-06-25 8:22 ` Eric Abrahamsen
2014-06-25 8:30 ` Bastien
2014-06-25 8:40 ` Eric Abrahamsen
2014-06-25 13:47 ` Matt Lundin
2014-06-26 2:58 ` Matt Lundin
2014-06-26 3:00 ` Matt Lundin
2014-06-27 12:56 ` Nicolas Goaziou
2014-06-27 13:37 ` Alan Schmitt [this message]
2014-06-27 22:31 ` Nicolas Goaziou
2014-06-28 19:27 ` Eric Abrahamsen
2014-06-29 1:39 ` York Zhao
2014-06-29 2:23 ` Eric Abrahamsen
2014-06-30 1:15 ` York Zhao
2014-06-30 1:43 ` York Zhao
2014-06-30 20:20 ` Alan Schmitt
2014-07-01 0:43 ` York Zhao
2014-07-01 7:38 ` Nicolas Goaziou
2014-07-01 17:14 ` York Zhao
2014-07-01 21:15 ` York Zhao
2014-07-02 8:01 ` Nicolas Goaziou
2014-07-03 1:03 ` York Zhao
2014-07-06 7:28 ` Nicolas Goaziou
2014-07-06 14:40 ` York Zhao
2014-07-06 21:05 ` York Zhao
2014-07-06 21:31 ` Nicolas Goaziou
2014-07-07 0:16 ` York Zhao
2014-07-07 5:27 ` Nicolas Goaziou
2014-07-25 14:33 ` Sebastien Vauban
2014-07-07 1:43 ` York Zhao
2014-07-07 5:33 ` Nicolas Goaziou
2014-07-07 15:10 ` York Zhao
2014-07-03 15:31 ` York Zhao
2014-07-03 15:55 ` York Zhao
2014-07-06 7:19 ` Nicolas Goaziou
2014-07-06 14:29 ` York Zhao
2014-07-15 2:30 ` York Zhao
2014-07-19 3:17 ` Matt Lundin
2014-07-19 14:12 ` York Zhao
2014-06-29 13:58 ` Nicolas Goaziou
2014-05-29 3:01 ` Daimrod
2014-05-30 9:17 ` Nicolas Goaziou
2014-05-30 14:35 ` Daimrod
2014-06-11 11:53 ` Daimrod
2014-06-11 21:30 ` Nicolas Goaziou
2014-06-11 22:18 ` Daimrod
2014-06-14 7:43 ` Nicolas Goaziou
2014-06-14 23:55 ` Daimrod
2014-06-22 7:58 ` Nicolas Goaziou
2014-06-04 4:47 ` Eric Abrahamsen
2014-06-05 4:29 ` Daimrod
-- strict thread matches above, loose matches on Subject: below --
2014-05-14 11:06 dieter
2014-05-15 2:29 ` Eric Abrahamsen
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=m2y4wieamk.fsf@top-wifi.irisa.fr \
--to=alan.schmitt@polytechnique.org \
--cc=daimrod@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=mdl@imapmail.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).