From: Peter Salazar <cycleofsong@gmail.com>
To: nicholas.dokos@hp.com
Cc: org-mode <emacs-orgmode@gnu.org>
Subject: Re: error in orgstruct-mode
Date: Sat, 20 Oct 2012 17:27:10 -0400 [thread overview]
Message-ID: <CAE+_6TzgpkZbjrxuB6gcRjmoLSDLxdjfEh_xL-Mwcev76xEO2A@mail.gmail.com> (raw)
In-Reply-To: <3572.1350695622@alphaville>
[-- Attachment #1: Type: text/plain, Size: 8644 bytes --]
OK, I was able to successfully install org-mode 7.9.2. But there's
something still wrong with the way org-mode and orgstruct-mode are handling
numbered lists.
In org-mode itself, when I enter "1. " and then hit OPTION-RETURN, it
generates the next line "2. " but my cursor stays on the first line "1. "
In markdown-mode with orgstruct-mode on, I get the following error:
Debugger entered--Lisp error: (args-out-of-range -1 2)
replace-match("- " nil nil nil 1)
(if (equal old-bul new-bul) nil (replace-match new-bul nil nil nil 1))
(unless (equal old-bul new-bul) (replace-match new-bul nil nil nil 1))
(let* ((new-ind ...) (old-ind ...) (new-bul ...) (old-bul ...) (new-box
...)) (looking-at org-list-full-item-re) (unless (equal old-bul new-bul)
(replace-match new-bul nil nil nil 1)) (cond (...) (... ...) (... ... ...)
(t ...)) (unless (= new-ind old-ind) (delete-region ... ...) (indent-to
new-ind)))
(lambda (item) (goto-char item) (let* (... ... ... ... ...) (looking-at
org-list-full-item-re) (unless ... ...) (cond ... ... ... ...) (unless ...
... ...)))(399)
funcall((lambda (item) (goto-char item) (let* (... ... ... ... ...)
(looking-at org-list-full-item-re) (unless ... ...) (cond ... ... ... ...)
(unless ... ... ...))) 399)
(if (or (not cell) (equal cell ...)) nil (funcall modify-item beg))
(unless (or (not cell) (equal cell ...)) (funcall modify-item beg))
(let* ((beg ...) (cell ...)) (unless (or ... ...) (funcall modify-item
beg)))
(lambda (e) (unless (zerop ...) (apply shift-body-ind e)) (let* (... ...)
(unless ... ...)))((404 399 0))
mapc((lambda (e) (unless (zerop ...) (apply shift-body-ind e)) (let* (...
...) (unless ... ...))) ((408 404 0) (404 399 0) (399 379 0) (379 300 0)
(300 231 0) (231 147 0)))
(let (end-list acc-end itm-shift all-ends sliced-struct) (mapc (lambda
... ...) old-struct) (setq all-ends (sort ... ...)) (while (cdr all-ends)
(let* ... ...)) (mapc (lambda ... ... ...) sliced-struct))
(let* ((origin ...) (inlinetask-re ...) (item-re ...) (shift-body-ind
...) (modify-item ...)) (let (end-list acc-end itm-shift all-ends
sliced-struct) (mapc ... old-struct) (setq all-ends ...) (while ... ...)
(mapc ... sliced-struct)) (goto-char origin) (move-marker origin nil))
org-list-struct-apply-struct(((147 1 "- " nil nil nil 231) (231 1 "- "
nil nil nil 300) (300 1 "- " nil nil nil 379) (379 1 "- " nil nil nil 399)
(399 1 "- " nil nil nil 404) (404 1 "- " nil nil nil 408)) ((147 1 "- " nil
nil nil 231) (231 1 "- " nil nil nil 300) (300 1 "- " nil nil nil 379) (379
1 "- " nil nil nil 399) (399 0 "1. " nil nil nil 404) (404 0 "1. " nil nil
nil 408)))
(let ((old-struct ...)) (org-list-struct-fix-ind struct parents 2)
(org-list-struct-fix-item-end struct) (let (...) (org-list-struct-fix-bul
struct prevs) (org-list-struct-fix-ind struct parents)
(org-list-struct-fix-box struct parents prevs))
(org-list-struct-apply-struct struct old-struct))
org-list-write-struct(((147 1 "- " nil nil nil 231) (231 1 "- " nil nil
nil 300) (300 1 "- " nil nil nil 379) (379 1 "- " nil nil nil 399) (399 1
"- " nil nil nil 404) (404 1 "- " nil nil nil 408)) ((147) (231) (300)
(379) (399) (404)))
(let* ((struct ...) (prevs ...) (desc ...)) (setq struct
(org-list-insert-item pos struct prevs checkbox desc))
(org-list-write-struct struct (org-list-parents-alist struct)) (when
checkbox (org-update-checkbox-count-maybe)) (looking-at
org-list-full-item-re) (goto-char (if ... ... ...)) t)
(if (save-excursion (goto-char itemp) (org-at-item-timer-p)) (progn
(org-timer-item) t) (let* (... ... ...) (setq struct ...)
(org-list-write-struct struct ...) (when checkbox ...) (looking-at
org-list-full-item-re) (goto-char ...) t))
(if (or (not itemp) (save-excursion ... ...)) nil (if (save-excursion ...
...) (progn ... t) (let* ... ... ... ... ... ... t)))
(unless (or (not itemp) (save-excursion ... ...)) (if (save-excursion ...
...) (progn ... t) (let* ... ... ... ... ... ... t)))
(let ((itemp ...) (pos ...)) (unless (or ... ...) (if ... ... ...)))
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
hide-previous previous-pos) (cond ... ... ...) (insert head)
(just-one-space) (setq pos ...) (end-of-line 1) (unless ... ... ...) (when
... ...) (run-hooks ...)))
(if (or (= ... 0) (and ... ...)) (progn (insert "\n* ") (run-hooks ...))
(when (or force-heading ...) (let* ... ... ... ... ... ... ... ... ...)))
org-insert-heading(nil)
call-interactively(org-insert-heading)
(let ((auto-fill-function ...) (indent-line-function ...)
(paragraph-start ...) (auto-fill-inhibit-regexp ...) (paragraph-separate
...) (outline-regexp ...) (outline-level ...) (org-todo-kwd-alist ...)
(org-todo-key-alist ...) (org-todo-key-trigger ...) (org-todo-keywords-1
...) (org-done-keywords ...) (org-todo-heads ...) (org-todo-sets ...)
(org-todo-log-states ...) (org-file-properties ...) (org-file-tags ...)
(org-use-sub-superscripts ...) (org-ds-keyword-length ...)
(org-drawer-regexp ...) (org-not-done-keywords ...) (org-todo-regexp ...)
(org-not-done-regexp ...) (org-todo-line-regexp ...)
(org-complex-heading-regexp ...) (org-complex-heading-regexp-format ...)
(org-todo-line-tags-regexp ...) (org-deadline-regexp ...)
(org-deadline-time-regexp ...) (org-deadline-line-regexp ...)
(org-scheduled-regexp ...) (org-scheduled-time-regexp ...)
(org-closed-time-regexp ...) (org-keyword-time-regexp ...)
(org-keyword-time-not-clock-regexp ...) (org-maybe-keyword-time-regexp ...)
(org-all-time-keywords ...) (org-latex-and-specials-regexp ...)
(org-font-lock-keywords ...) (org-table-may-need-update ...)
(indent-region-function ...) (org-target-link-regexp ...)
(fill-paragraph-function ...) (normal-auto-fill-function ...)
(comment-line-break-function ...) (comment-use-syntax ...) (comment-start
...) (comment-start-skip ...) (comment-insert-comment-function ...)
(comment-region-function ...) ...) (call-interactively (quote
org-insert-heading)))
eval((let ((auto-fill-function ...) (indent-line-function ...)
(paragraph-start ...) (auto-fill-inhibit-regexp ...) (paragraph-separate
...) (outline-regexp ...) (outline-level ...) (org-todo-kwd-alist ...)
(org-todo-key-alist ...) (org-todo-key-trigger ...) (org-todo-keywords-1
...) (org-done-keywords ...) (org-todo-heads ...) (org-todo-sets ...)
(org-todo-log-states ...) (org-file-properties ...) (org-file-tags ...)
(org-use-sub-superscripts ...) (org-ds-keyword-length ...)
(org-drawer-regexp ...) (org-not-done-keywords ...) (org-todo-regexp ...)
(org-not-done-regexp ...) (org-todo-line-regexp ...)
(org-complex-heading-regexp ...) (org-complex-heading-regexp-format ...)
(org-todo-line-tags-regexp ...) (org-deadline-regexp ...)
(org-deadline-time-regexp ...) (org-deadline-line-regexp ...)
(org-scheduled-regexp ...) (org-scheduled-time-regexp ...)
(org-closed-time-regexp ...) (org-keyword-time-regexp ...)
(org-keyword-time-not-clock-regexp ...) (org-maybe-keyword-time-regexp ...)
(org-all-time-keywords ...) (org-latex-and-specials-regexp ...)
(org-font-lock-keywords ...) (org-table-may-need-update ...)
(indent-region-function ...) (org-target-link-regexp ...)
(fill-paragraph-function ...) (normal-auto-fill-function ...)
(comment-line-break-function ...) (comment-use-syntax ...) (comment-start
...) (comment-start-skip ...) (comment-insert-comment-function ...)
(comment-region-function ...) ...) (call-interactively (quote
org-insert-heading))))
org-run-like-in-org-mode(org-insert-heading)
(if (org-context-p (quote headline) (quote item) (and orgstruct-is-++ t
...)) (org-run-like-in-org-mode (quote org-insert-heading)) (let
(orgstruct-mode) (call-interactively ...)))
orgstruct-hijacker-command-106(1)
call-interactively(orgstruct-hijacker-command-106 nil nil)
On Fri, Oct 19, 2012 at 9:13 PM, Nick Dokos <nicholas.dokos@hp.com> wrote:
> Peter Salazar <cycleofsong@gmail.com> wrote:
>
> > Thanks. I tried upgrading my version of org to 7.9.2, but then whenever
> I launched Aquamacs, I got
> > this message:
> >
> > Wrong type argument: integer-or-marker-p, nil
> >
> > I couldn't save or do anything, so I went back to the old version.
> >
> > Anyone know the solution to the Wrong type argument:
> integer-or-marker-p, nil?
> >
>
> Presumably something incompatible in your org initialization.
> Does aquamacs allow for --debug-init? If not, then do the aquamacs
> equivalent of -q, turn on debug-on-error, load your org initialization
> by hand and send the backtrace.
>
> Nick
>
[-- Attachment #2: Type: text/html, Size: 9851 bytes --]
next prev parent reply other threads:[~2012-10-20 21:27 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-10-18 16:52 error in orgstruct-mode Peter Salazar
2012-10-19 22:31 ` Peter Salazar
2012-10-19 22:54 ` Nick Dokos
2012-10-20 0:21 ` Peter Salazar
2012-10-20 1:13 ` Nick Dokos
2012-10-20 21:27 ` Peter Salazar [this message]
2012-10-20 23:11 ` Nick Dokos
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=CAE+_6TzgpkZbjrxuB6gcRjmoLSDLxdjfEh_xL-Mwcev76xEO2A@mail.gmail.com \
--to=cycleofsong@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=nicholas.dokos@hp.com \
/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).