From: Leo <sdl.web@gmail.com>
To: emacs-orgmode@gnu.org
Subject: [bug] infinite loop
Date: Wed, 11 Apr 2007 21:06:37 +0100 [thread overview]
Message-ID: <m2r6qqvfoy.fsf@sl392.st-edmunds.cam.ac.uk> (raw)
Another bug in 4.70.
before the first level-1 heading, typing "M-RET" will enter emacs into
infinite loop.
,----[ Backtrace ]
| Debugger entered--Lisp error: (quit)
| looking-at("[ ]*$")
| (if (looking-at "[ ]*$") (setq ind1 ind-empty) (skip-chars-forward " ") (setq ind1 (current-column)))
| (while t (beginning-of-line 0) (if (< ... limit) (throw ... nil)) (if (looking-at "[ ]*$") (setq ind1 ind-empty) (skip-chars-forward " ") (setq ind1 ...)) (if (< ind1 ind) (throw ... ...)))
| (catch (quote exit) (while t (beginning-of-line 0) (if ... ...) (if ... ... ... ...) (if ... ...)))
| (if (catch (quote exit) (while t ... ... ... ...)) nil (goto-char pos) (error "Not in an item"))
| (if (org-at-item-p) (beginning-of-line 1) (beginning-of-line 1) (skip-chars-forward " ") (setq ind (current-column)) (if (catch ... ...) nil (goto-char pos) (error "Not in an item")))
| (let ((pos ...) (limit ...) (ind-empty ...) ind ind1) (if (org-at-item-p) (beginning-of-line 1) (beginning-of-line 1) (skip-chars-forward " ") (setq ind ...) (if ... nil ... ...)))
| org-beginning-of-item()
| (progn (org-beginning-of-item) (org-at-item-p) (if (org-invisible-p) (error "Invisible item")) t)
| (condition-case nil (progn (org-beginning-of-item) (org-at-item-p) (if ... ...) t) (error nil))
| (save-excursion (condition-case nil (progn ... ... ... t) (error nil)))
| (if (save-excursion (condition-case nil ... ...)) (progn (let* ... ... ... ... ... ... ...) (org-maybe-renumber-ordered-list) (and checkbox ...) t))
| (when (save-excursion (condition-case nil ... ...)) (let* (... ... ... pos) (cond ... ... ...) (insert bul ...) (just-one-space) (setq pos ...) (end-of-line 1) (unless ... ... ...)) (org-maybe-renumber-ordered-list) (and checkbox (org-update-checkbox-count-maybe)) t)
| org-insert-item()
| (not (org-insert-item))
| (or force-heading (not (org-insert-item)))
| (if (or force-heading (not ...)) (progn (let* ... ... ... ... ... ... ... ...)))
| (when (or force-heading (not ...)) (let* (... ... pos) (cond ... ... ...) (insert head) (just-one-space) (setq pos ...) (end-of-line 1) (unless ... ... ...) (run-hooks ...)))
| (if (= (buffer-size) 0) (insert "\n* ") (when (or force-heading ...) (let* ... ... ... ... ... ... ... ...)))
| org-insert-heading(nil)
| call-interactively(org-insert-heading)
| (cond ((org-at-table-p) (call-interactively ...)) (t (call-interactively ...)))
| org-meta-return(nil)
| call-interactively(org-meta-return)
`----
Regards,
--
Leo <sdl.web AT gmail.com> (GPG Key: 9283AA3F)
next reply other threads:[~2007-04-11 20:10 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-04-11 20:06 Leo [this message]
2007-04-11 23:19 ` [bug] infinite loop Jason F. McBrayer
2007-04-12 7:09 ` 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
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=m2r6qqvfoy.fsf@sl392.st-edmunds.cam.ac.uk \
--to=sdl.web@gmail.com \
--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).