From mboxrd@z Thu Jan 1 00:00:00 1970 From: Alan Schmitt Subject: gnus link no longer work Date: Thu, 06 Sep 2018 13:47:39 +0200 Message-ID: Mime-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha512; protocol="application/pgp-signature" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:34055) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fxslV-0005RO-PX for emacs-orgmode@gnu.org; Thu, 06 Sep 2018 07:48:03 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fxslQ-0000OD-NM for emacs-orgmode@gnu.org; Thu, 06 Sep 2018 07:48:00 -0400 Received: from mail2-relais-roc.national.inria.fr ([192.134.164.83]:65364) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1fxslO-000052-Pd for emacs-orgmode@gnu.org; Thu, 06 Sep 2018 07:47:56 -0400 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 --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Hello, I've recently noticed that following gnus links (created by org-store-link) no longer work. When I try to open one, I get an error, and I see the gnus summary populated with the message I need, but I cannot read it. Here is the backtrace when I follow the link Debugger entered--Lisp error: (wrong-type-argument consp nil) nnir-request-update-info("nnir:work" nil) nnir-request-group("work" "nnimap:inria" t nil) gnus-request-group("nnimap+inria:work" t) gnus-check-group-server() gnus-request-article-this-buffer(-1 "nnimap+inria:work") gnus-article-prepare(-1 nil) gnus-summary-display-article(-1 nil) gnus-summary-select-article(nil nil nil -1) gnus-summary-refer-article("EF188ABB-9586-4B61-B82F-48FDC37DA0BE@inria.fr= ") gnus-summary-goto-article("EF188ABB-9586-4B61-B82F-48FDC37DA0BE@inria.fr"= nil t) org-gnus-follow-link("nnimap+inria:work" "EF188ABB-9586-4B61-B82F-48FDC37= DA0BE@inria.fr") org-gnus-open("nnimap+inria:work#EF188ABB-9586-4B61-B82F-48FDC37DA0BE@inr= ia.fr") org-open-at-point() (if (and path (image-type-from-file-name path)) (+org/refresh-inline-imag= es) (org-open-at-point)) (let ((path (org-element-property :path (org-element-lineage context '(li= nk) t)))) (if (and path (image-type-from-file-name path)) (+org/refresh-inl= ine-images) (org-open-at-point))) (cond ((org-element-property :checkbox (org-element-lineage context '(ite= m) t)) (let ((match (and (org-at-item-checkbox-p) (match-string 1)))) (org-= toggle-checkbox (if (equal match "[ ]") '(16))))) ((eq type 'headline) (con= d ((org-element-property :todo-type context) (org-todo (if (eq (org-element= -property :todo-type context) 'done) 'todo 'done))) ((string=3D "ARCHIVE" (= car-safe (org-get-tags))) (org-force-cycle-archived)) (t (+org/refresh-inli= ne-images) (org-remove-latex-fragment-image-overlays) (org-toggle-latex-fra= gment '(4))))) ((eq type 'clock) (org-clock-update-time-maybe)) ((eq type '= footnote-reference) (org-footnote-goto-definition (org-element-property :la= bel context))) ((eq type 'footnote-definition) (org-footnote-goto-previous-= reference (org-element-property :label context))) ((memq type '(timestamp p= lanning)) (org-follow-timestamp-link)) ((memq type '(table-row table)) (if = (org-at-TBLFM-p) (org-table-calc-current-TBLFM) (condition-case nil (progn = (save-excursion (goto-char (org-element-property :contents-begin context)) = (org-call-with-arg 'org-table-recalculate (or arg t)))) (error nil)))) ((eq= type 'table-cell) (org-table-blank-field) (org-table-recalculate) (if (and= (string-empty-p (string-trim (org-table-get-field))) (and (boundp 'evil-mo= de) evil-mode)) (progn (evil-change-state 'insert)))) ((eq type 'babel-call= ) (org-babel-lob-execute-maybe)) ((eq type 'statistics-cookie) (save-excurs= ion (org-update-statistics-cookies nil))) ((memq type '(inline-src-block sr= c-block)) (org-babel-execute-src-block)) ((memq type '(latex-environment la= tex-fragment)) (org-toggle-latex-fragment)) ((eq type 'link) (let ((path (o= rg-element-property :path (org-element-lineage context '(link) t)))) (if (a= nd path (image-type-from-file-name path)) (+org/refresh-inline-images) (org= -open-at-point)))) (t (+org/refresh-inline-images))) (let* ((context (org-element-context)) (type (org-element-type context)))= (while (and context (memq type '(verbatim code bold italic underline strik= e-through subscript superscript))) (setq context (org-element-property :par= ent context) type (org-element-type context))) (cond ((org-element-property= :checkbox (org-element-lineage context '(item) t)) (let ((match (and (org-= at-item-checkbox-p) (match-string 1)))) (org-toggle-checkbox (if (equal mat= ch "[ ]") '(16))))) ((eq type 'headline) (cond ((org-element-property :todo= -type context) (org-todo (if (eq (org-element-property :todo-type context) = 'done) 'todo 'done))) ((string=3D "ARCHIVE" (car-safe (org-get-tags))) (org= -force-cycle-archived)) (t (+org/refresh-inline-images) (org-remove-latex-f= ragment-image-overlays) (org-toggle-latex-fragment '(4))))) ((eq type 'cloc= k) (org-clock-update-time-maybe)) ((eq type 'footnote-reference) (org-footn= ote-goto-definition (org-element-property :label context))) ((eq type 'foot= note-definition) (org-footnote-goto-previous-reference (org-element-propert= y :label context))) ((memq type '(timestamp planning)) (org-follow-timestam= p-link)) ((memq type '(table-row table)) (if (org-at-TBLFM-p) (org-table-ca= lc-current-TBLFM) (condition-case nil (progn (save-excursion (goto-char (or= g-element-property :contents-begin context)) (org-call-with-arg 'org-table-= recalculate (or arg t)))) (error nil)))) ((eq type 'table-cell) (org-table-= blank-field) (org-table-recalculate) (if (and (string-empty-p (string-trim = (org-table-get-field))) (and (boundp 'evil-mode) evil-mode)) (progn (evil-c= hange-state 'insert)))) ((eq type 'babel-call) (org-babel-lob-execute-maybe= )) ((eq type 'statistics-cookie) (save-excursion (org-update-statistics-coo= kies nil))) ((memq type '(inline-src-block src-block)) (org-babel-execute-s= rc-block)) ((memq type '(latex-environment latex-fragment)) (org-toggle-lat= ex-fragment)) ((eq type 'link) (let ((path (org-element-property :path (org= -element-lineage context '(link) t)))) (if (and path (image-type-from-file-= name path)) (+org/refresh-inline-images) (org-open-at-point)))) (t (+org/re= fresh-inline-images)))) +org/dwim-at-point() funcall-interactively(+org/dwim-at-point) call-interactively(+org/dwim-at-point nil nil) command-execute(+org/dwim-at-point) If I later try to see the message (hitting Enter on it), I get this Debugger entered--Lisp error: (wrong-type-argument consp nil) nnir-request-update-info("nnir:work" nil) nnir-request-group("work" "nnimap:inria" t nil) gnus-request-group("nnimap+inria:work" t) gnus-check-group-server() gnus-request-article-this-buffer(-1 "nnimap+inria:work") gnus-article-prepare(-1 nil) gnus-summary-display-article(-1 nil) gnus-summary-select-article(nil nil pseudo) gnus-summary-scroll-up(1) funcall-interactively(gnus-summary-scroll-up 1) call-interactively(gnus-summary-scroll-up nil nil) command-execute(gnus-summary-scroll-up) I recently updated org-plus-contrib, and I'm using emacs 26.1. Is this a known bug? Thanks, Alan =2D-=20 OpenPGP Key ID : 040D0A3B4ED2E5C7 Monthly Athmospheric CO=E2=82=82, Mauna Loa Obs. 2018-08: 406.99, 2017-08: = 405.07 --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- Comment: GPGTools - https://gpgtools.org iQEzBAEBCgAdFiEE6lXof/BsSVW56ZmGBA0KO07S5ccFAluRE90ACgkQBA0KO07S 5cc+lQf9FpnMj7suV+hq8wvj/DnGLlJ063Pki+bd2DKxu/S4q6IPdRyoay7SfeV5 S1qU/dt+cEIutP2IyXuSB3zadrFAyEJ2MhgQSSJe/C3ODSuIzaevBJ7UJGqNH/C/ arPowDzUHUTzvpDamaH8eAYj+Xq05SZEBZashToVhTRaf0v2pL04XhNkgIv0LQDR 8FOX7iQZ2xB2+mCIOVOZ/CckFQzyKFXIfjzdwBwpRP5oDDC7qYmx0rdhGL/ATt9i DM1WoAMlCVVJ01XS2ahh3hLoDdBJLi2O9BM7TRWU7AyRQsbKFSE8FkUcQt+JbK8W 59rca0vG0DoWTizP4j/EUBv40ITE4w== =WH20 -----END PGP SIGNATURE----- --=-=-=--