From mboxrd@z Thu Jan 1 00:00:00 1970 From: Nicolas Goaziou Subject: Re: Orgalist notes Date: Mon, 07 May 2018 14:37:40 +0200 Message-ID: <87a7tbwsiz.fsf@nicolasgoaziou.fr> References: <87sh754q02.fsf@ericabrahamsen.net> <87bmdtkqtl.fsf@len.workgroup> <87k1sh81f8.fsf@nicolasgoaziou.fr> <87in7zbzfy.fsf@len.workgroup> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:52136) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fFfOm-0001CC-84 for emacs-orgmode@gnu.org; Mon, 07 May 2018 08:37:49 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fFfOj-0002HM-3r for emacs-orgmode@gnu.org; Mon, 07 May 2018 08:37:48 -0400 Received: from relay10.mail.gandi.net ([217.70.178.230]:45233) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1fFfOi-0002Em-ST for emacs-orgmode@gnu.org; Mon, 07 May 2018 08:37:45 -0400 Received: from saiph (40-67.ipv4.commingeshautdebit.fr [185.131.40.67]) (Authenticated sender: admin@nicolasgoaziou.fr) by relay10.mail.gandi.net (Postfix) with ESMTPSA id 51BB4240007 for ; Mon, 7 May 2018 14:37:42 +0200 (CEST) Received: from ngz by saiph with local (Exim 4.89) (envelope-from ) id 1fFfOe-0006wK-Ep for emacs-orgmode@gnu.org; Mon, 07 May 2018 14:37:40 +0200 In-Reply-To: <87in7zbzfy.fsf@len.workgroup> (Gregor Zattler's message of "Mon, 07 May 2018 11:13:53 +0200") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: emacs-orgmode@gnu.org Hello, Gregor Zattler 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