From: "Francis J. Monari, Esquire" <monarifj.esq@juno.com>
To: emacs-orgmode@gnu.org
Subject: Bug: Mobile Org startgroup [8.3.4 (8.3.4-93-g0d72c3-elpaplus @ c:/USR/FJM/APP/.emacs.d/elpa/org-plus-contrib-20160627/)]
Date: Wed, 6 Jul 2016 11:18:27 -0400 [thread overview]
Message-ID: <e9440ac7-0193-b01d-5b60-9fbd0f66b3b9@juno.com> (raw)
All,
I added group tags to org-tag-alist.
(:startgrouptag . nil)
("▸_NEW_SKILL" . ?\3)
("✔_OFF_CASE_PLAN" . ?\4)
("✘_LEFT_FIELD" . ?\5)
(:endgrouptag . nil)
When I used mobile org, about when it was generating indices, it
displayed the following message:
org-mobile-create-index-file: Wrong type argument: sequencep,
:startgrouptag
I expected Mobile Org to finish properly. (It had before adding the
group tags. I believe that group tags should be supported.)
Research on the web returned this thread:
From: John Hutchinson
Subject: Re: [O] Bug and possible fix / work-around using
org-mobile with group tags
Date: Fri, 26 Feb 2016 00:35:01 +0000 (UTC)
This thread recommended the following patch:
HoldingPen $ cat patch
*** org-mobile.el.GOOD 2016-02-25 17:19:52.489685000 -0500
---
/home/hutchinson/.emacs.d/elpa/org-plus-contrib-20160222/org-mobile.el
2016-02-25 19:18:38.746283600 -0500
***************
*** 454,467 ****
(insert "#+TODO: " (mapconcat 'identity todo-kwds " ") " | "
(mapconcat 'identity done-kwds " ") "\n"))
(setq def-tags (mapcar
! (lambda (x)
! (cond ((null x) nil)
! ((stringp x) x)
! ((eq (car x) :startgroup) "{")
! ((eq (car x) :endgroup) "}")
! ((eq (car x) :grouptags) nil)
! ((eq (car x) :newline) nil)
! ((listp x) (car x))))
def-tags))
(setq def-tags (delq nil def-tags))
(setq tags (org-delete-all def-tags tags))
--- 454,469 ----
(insert "#+TODO: " (mapconcat 'identity todo-kwds " ") " | "
(mapconcat 'identity done-kwds " ") "\n"))
(setq def-tags (mapcar
! (lambda (tag)
! (cl-case (car tag)
! ((nil) nil)
! (:startgroup "{")
! (:endgroup "}")
! (:startgrouptag "{")
! (:endgrouptag "}")
! (:grouptags ":")
! (:newline nil)
! (t (car tag))))
def-tags))
(setq def-tags (delq nil def-tags))
(setq tags (org-delete-all def-tags tags))
HoldingPen $
I manually applied the patch. It resolved my issue.
Two Questions:
= Is there any down-side to this patch? (My knowledge of LiSP and Org
is very limited.)
= If appropriate, can the source code be patched?
Thank you.
Frank.
Emacs : GNU Emacs 24.5.1 (i686-pc-mingw32)
of 2015-04-11 on LEG570
Package: Org-mode version 8.3.4 (8.3.4-93-g0d72c3-elpaplus @
c:/USR/FJM/APP/.emacs.d/elpa/org-plus-contrib-20160627/
next reply other threads:[~2016-07-06 15:51 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
2016-07-06 15:18 Francis J. Monari, Esquire [this message]
2016-07-06 20:57 ` Bug: Mobile Org startgroup [8.3.4 (8.3.4-93-g0d72c3-elpaplus @ c:/USR/FJM/APP/.emacs.d/elpa/org-plus-contrib-20160627/)] Nicolas Goaziou
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=e9440ac7-0193-b01d-5b60-9fbd0f66b3b9@juno.com \
--to=monarifj.esq@juno.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).