From mboxrd@z Thu Jan 1 00:00:00 1970 From: John Hutchinson Subject: Bug and possible fix / work-around using org-mobile with group tags Date: Thu, 11 Feb 2016 13:52:30 +0000 (UTC) Message-ID: <608350460.2102657.1455198750254.JavaMail.yahoo@mail.yahoo.com> References: <608350460.2102657.1455198750254.JavaMail.yahoo.ref@mail.yahoo.com> Reply-To: John Hutchinson Mime-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_Part_2102656_1886112037.1455198750250" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:58116) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aTriO-0006Of-3t for emacs-orgmode@gnu.org; Thu, 11 Feb 2016 08:55:26 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1aTriG-0007Xe-IH for emacs-orgmode@gnu.org; Thu, 11 Feb 2016 08:55:24 -0500 Received: from nm42-vm0.bullet.mail.ne1.yahoo.com ([98.138.121.56]:54340) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aTriG-0007Wh-9Z for emacs-orgmode@gnu.org; Thu, 11 Feb 2016 08:55:16 -0500 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-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: "emacs-orgmode@gnu.org" ------=_Part_2102656_1886112037.1455198750250 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 7bit - Running org-mobile-push with group tags defined in init.el file using :startgrouptag etc. results in an error, and (in my case) DropBox not being updated. Here's the log from the *Messages* buffer: Creating agendas... Agenda written to Org file /cygdrive/c/Users/IBM_ADMIN/Dropbox/Apps/MobileOrg/agendas.org Creating agendas...done Saving all Org-mode buffers... (No files need saving) Saving all Org-mode buffers... done Copying files... Writing index file... org-mobile-create-index-file: Wrong type argument: sequencep, :startgrouptag Quit [2 times] - Commenting out the group tags attributes in init.el results in Org Mobile successfully generating and pushing to DropBox. - Turning group tags off with org-toggle-tags-groups and running org-mobile-push causes the error. - Using Org from org-plus-contrib-20160208, the problem seems to be the :startgroup and :endgroup on lines 460 and 461 of org-mobile.el; patching them to :startgrouptag and :endgrouptag respectively appears to correct the issue (though I've not done in-depth testing for any other unintended side effects this patch may have). - Also, changing the group attributes in my init.el from :startgrouptag :endgrouptag to :startgroup and :endgroup respectively corrects the issue, although the Org manual indicates that the longer form is correct. - As an aside, I note there are several instances of plain :startgroup intermingled with :startgrouptag in the org sources: org-plus-contrib-20160208 $ grep -n startgroup *.el org.el:3492: (const :startgroup) org.el:3495: (const :startgrouptag) org.el:3523: (const :tag "Start radio group" (:startgroup)) org.el:5063: (append '((:startgroup)) org.el:5233: (:startgroup "{") org.el:5235: (:startgrouptag "[") org.el:5252: (push '(:startgroup) org-tag-alist) org.el:5258: (push '(:startgrouptag) org-tag-alist) org.el:5322: (if (or (memq (car e) '(:newline :grouptags :endgroup :startgroup)) org.el:13093: ((equal e '(:startgroup)) org.el:15232: ((eq (car e) :startgroup) org.el:15241: ((eq (car e) :startgrouptag) org-interactive-query.el:92: ((equal e '(:startgroup)) org-interactive-query.el:268: ;; if this is not a keyword (:startgroup, etc), ignore it org-mobile.el:460: ((eq (car x) :startgroup) "{") org-pcomplete.el:245: ((eq :startgroup (car x)) "{") ox-beamer.el:1128: (append '((:startgroup)) Regards,=John P.S. First time writing to this list; apologies in advance for breaches of etiquette. ------=_Part_2102656_1886112037.1455198750250 Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: 7bit

  1. Running org-mobile-push with group tags defined in init.el file using :startgrouptag etc. results in an error, and (in my case) DropBox not being updated. Here's the log from the *Messages* buffer:
    Creating agendas...
    Agenda written to Org file /cygdrive/c/Users/IBM_ADMIN/Dropbox/Apps/MobileOrg/agendas.org
    Creating agendas...done
    Saving all Org-mode buffers...
    (No files need saving)
    Saving all Org-mode buffers... done
    Copying files...
    Writing index file...
    org-mobile-create-index-file: Wrong type argument: sequencep, :startgrouptag
    Quit
     [2 times]
    
  2. Commenting out the group tags attributes in init.el results in Org Mobile successfully generating and pushing to DropBox.
  3. Turning group tags off with org-toggle-tags-groups and running org-mobile-push causes the error.
  4. Using Org from org-plus-contrib-20160208, the problem seems to be the :startgroup and :endgroup on lines 460 and 461 of org-mobile.el; patching them to :startgrouptag and :endgrouptag respectively appears to correct the issue (though I've not done in-depth testing for any other unintended side effects this patch may have).
  5. Also, changing the group attributes in my init.el from :startgrouptag :endgrouptag to :startgroup and :endgroup respectively corrects the issue, although the Org manual indicates that the longer form is correct.
  6. As an aside, I note there are several instances of plain :startgroup intermingled with :startgrouptag in the org sources:
    org-plus-contrib-20160208 $ grep -n startgroup *.el
    org.el:3492:		 (const :startgroup)
    org.el:3495:		 (const :startgrouptag)
    org.el:3523:	   (const :tag "Start radio group" (:startgroup))
    org.el:5063:				   (append '((:startgroup))
    org.el:5233:		      (:startgroup "{")
    org.el:5235:		      (:startgrouptag "[")
    org.el:5252:	  (push '(:startgroup) org-tag-alist)
    org.el:5258:	  (push '(:startgrouptag) org-tag-alist)
    org.el:5322:      (if (or (memq (car e) '(:newline :grouptags :endgroup :startgroup))
    org.el:13093:	   ((equal e '(:startgroup))
    org.el:15232:	 ((eq (car e) :startgroup)
    org.el:15241:	 ((eq (car e) :startgrouptag)
    org-interactive-query.el:92:	 ((equal e '(:startgroup))
    org-interactive-query.el:268:     ;; if this is not a keyword (:startgroup, etc), ignore it
    org-mobile.el:460:			      ((eq (car x) :startgroup) "{")
    org-pcomplete.el:245:		  ((eq :startgroup (car x)) "{")
    ox-beamer.el:1128:	  (append '((:startgroup))
    
Regards,
=John

P.S. First time writing to this list; apologies in advance for breaches of etiquette.
------=_Part_2102656_1886112037.1455198750250--