emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] Orgalist notes


From: Nicolas Goaziou
Subject: Re: [O] Orgalist notes
Date: Mon, 07 May 2018 14:37:40 +0200
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/25.3 (gnu/linux)

Hello,

Gregor Zattler <address@hidden> writes:

> 1. rzhe juhgdhjvhj vghfjs y rvgfhjxd bvjxdbv mh vxnbxgbfvghg drgh
>    djhxcjhbnjdfjhvgjhf jhfhjghfj hfjM-RET
>
>
> gives:
>
> Debugger entered--Lisp error: (wrong-type-argument integer-or-marker-p nil)
>   org-list-insert-item(1504 ((1397 0 "1. " nil nil nil 1505)) ((1397)) nil 
> nil)
>   (setq struct (org-list-insert-item (point) struct prevs checkbox desc))
>   (let* ((struct (save-excursion (goto-char item\?) (orgalist--struct))) 
> (prevs (org-list-prevs-alist struct)) (desc (and (eq 'descriptive 
> (org-list-get-list-type item\? struct prevs)) " :: "))) (setq struct 
> (org-list-insert-item (point) struct prevs checkbox desc)) 
> (org-list-write-struct struct (org-list-parents-alist struct)) (looking-at 
> orgalist--item-re) (goto-char (if (and (match-beginning 4) (let 
> ((save-match-data-internal (match-data))) (unwind-protect (progn 
> (string-match "\\." (match-string 1))) (set-match-data 
> save-match-data-internal 'evaporate)))) (match-beginning 4) (match-end 0))) 
> (if desc (progn (backward-char 1))))
>   (let ((item\? (orgalist--in-item-p))) (if item\? nil (user-error "Not in a 
> list")) (let* ((struct (save-excursion (goto-char item\?) 
> (orgalist--struct))) (prevs (org-list-prevs-alist struct)) (desc (and (eq 
> 'descriptive (org-list-get-list-type item\? struct prevs)) " :: "))) (setq 
> struct (org-list-insert-item (point) struct prevs checkbox desc)) 
> (org-list-write-struct struct (org-list-parents-alist struct)) (looking-at 
> orgalist--item-re) (goto-char (if (and (match-beginning 4) (let 
> ((save-match-data-internal (match-data))) (unwind-protect (progn 
> (string-match "\\." (match-string 1))) (set-match-data 
> save-match-data-internal 'evaporate)))) (match-beginning 4) (match-end 0))) 
> (if desc (progn (backward-char 1)))))
>   orgalist-insert-item(nil)
>   funcall-interactively(orgalist-insert-item nil)
>   call-interactively(orgalist-insert-item nil nil)
>   command-execute(orgalist-insert-item)
>
> I have no clue how to read this.

I cannot reproduce the issue. It seems to be with "org-list.el".

Could you do it again, this time after loading Org uncompiled? I need
the backtrace to step into `org-list-insert-item'.


Regards,

-- 
Nicolas Goaziou



reply via email to

[Prev in Thread] Current Thread [Next in Thread]