From: Rustom Mody <rustompmody@gmail.com>
To: Ihor Radchenko <yantar92@posteo.net>
Cc: Nicolas Goaziou <mail@nicolasgoaziou.fr>, emacs-orgmode@gnu.org
Subject: Re: [BUG] orgalist send bug
Date: Tue, 18 Jun 2024 14:14:34 +0530 [thread overview]
Message-ID: <CAJ+Teoc1KHNBypVeeF0EOyKhuVW89U0FF4vA4kDv27-6fWH6tg@mail.gmail.com> (raw)
In-Reply-To: <8734paaebn.fsf@localhost>
On Tue, Jun 18, 2024 at 1:09 PM Ihor Radchenko <yantar92@posteo.net> wrote:
>
> Rustom Mody <rustompmody@gmail.com> writes:
>
> >> 1. make repro
> >> 2. (push "/path/to/orgalist/folder/on/elpa/dir" load-path)
> >>
> >>
> > Doing that alone does not find orgalist-mode
> > If I add:
> > 3. load-file "/path/to/orgalist/folder/on/elpa/dir/orgalist-autoloads.el"
> >
> > then orgalist minor mode starts
> >
> > But on M-x orgalist-send-list I get
> >
> > Debugger entered--Lisp error: (error "Not at a list item")
> > error("Not at a list item")
>
> Hmm. Let's try to isolate things even further.
>
> May you
>
> 1. make repro
> 2. download orgalist source code separately
All I can find is https://elpa.gnu.org/packages/orgalist.html
That has a link
https://elpa.gnu.org/packages/orgalist-1.14.tar
which is broken
Also it has versions 1.14 and 1.15 confused
Latest orgalist-1.14.tar
But below the badge
GNU ELPA orgalist 1.15
When I changed the 14 in the link to 15 I could download a tar file
It seems to contain the same file that elpa gets
I load it by hand
Get the same error:
Debugger entered--Lisp error: (error "Not at a list item")
error("Not at a list item")
(if (orgalist--at-item-p) nil (error "Not at a list item"))
(catch 'exit (if (orgalist--at-item-p) nil (error "Not at a list
item")) (save-excursion (let ((case-fold-search t))
(re-search-backward "^[ \11]*#\\+ORGLST:" nil t) (if (looking-at "[
\11]*#\\+ORGLST:[ \11]+SEND[ \11]+\\(\\S-+\\)[ \11]+\\([^ \11\n]...")
nil (if maybe (throw 'exit nil) (error "Don't know how to transform
this list"))))) (let* ((name (regexp-quote (match-string 1)))
(transform (intern (match-string 2))) (bottom-point (save-excursion
(re-search-forward "\\(\\\\end{comment}\\|@end ignore\\|-->\\)" nil t)
(match-beginning 0))) (top-point (progn (re-search-backward
"#\\+ORGLST" nil t) (re-search-forward (org-item-beginning-re)
bottom-point t) (match-beginning 0))) (plain-list (save-excursion
(goto-char top-point) (funcall 'org-list-to-lisp)))) (if (fboundp
transform) nil (error "No such transformation function %s" transform))
(let ((txt (funcall transform plain-list))) (save-excursion (goto-char
(point-min)) (let ((receiver-count 0) (begin-re (format "BEGIN
+RECEIVE +ORGLST +%s\\([ \11]\\|$\\)" name)) (end-re (format "END
+RECEIVE +ORGLST +%s\\([ \11]\\|$\\)" name))) (while
(re-search-forward begin-re nil t) (setq receiver-count (1+
receiver-count)) (let (...) (if ... nil ...) (beginning-of-line)
(delete-region beg ...) (insert txt "\n"))) (cond ((> receiver-count
1) (message "List converted and installed at receiver locations")) ((=
receiver-count 1) (message "List converted and installed at receiver
location")) (t (user-error "No valid receiver location found"))))))))
orgalist-send-list()
funcall-interactively(orgalist-send-list)
command-execute(orgalist-send-list record)
execute-extended-command(nil "orgalist-send-list" "orgalist-se")
funcall-interactively(execute-extended-command nil
"orgalist-send-list" "orgalist-se")
command-execute(execute-extended-command)
next prev parent reply other threads:[~2024-06-18 9:04 UTC|newest]
Thread overview: 19+ messages / expand[flat|nested] mbox.gz Atom feed top
2024-06-14 16:54 [BUG] orgalist send bug Rustom Mody
2024-06-15 13:27 ` Ihor Radchenko
2024-06-16 2:31 ` Rustom Mody
2024-06-16 2:44 ` Rustom Mody
2024-06-16 12:13 ` Ihor Radchenko
2024-06-17 5:02 ` Rustom Mody
2024-06-17 5:07 ` Rustom Mody
2024-06-17 15:48 ` Ihor Radchenko
2024-06-17 18:07 ` Nicolas Goaziou via General discussions about Org-mode.
2024-06-18 6:26 ` Rustom Mody
2024-06-18 6:31 ` Ihor Radchenko
2024-06-18 6:47 ` Rustom Mody
2024-06-18 6:50 ` Rustom Mody
2024-06-18 7:40 ` Ihor Radchenko
2024-06-18 8:44 ` Rustom Mody [this message]
2024-06-18 14:45 ` Ihor Radchenko
2024-06-18 9:21 ` Nicolas Goaziou via General discussions about Org-mode.
2024-06-18 9:34 ` Rustom Mody
2024-06-18 12:05 ` Rustom Mody
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=CAJ+Teoc1KHNBypVeeF0EOyKhuVW89U0FF4vA4kDv27-6fWH6tg@mail.gmail.com \
--to=rustompmody@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=mail@nicolasgoaziou.fr \
--cc=yantar92@posteo.net \
/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).