From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail
From: Ihor Radchenko <yantar92@posteo.net>
Newsgroups: gmane.emacs.bugs
Subject: bug#71851: 31.0.50; error with (use-package org ...)
Date: Mon, 01 Jul 2024 11:11:08 +0000
Message-ID: <87o77hicz7.fsf@localhost>
References: <CAOA-32OvD7ATY+aswj9LOkWrwzkJoQdj3OyQRR2pj5W2CWqcqw@mail.gmail.com>
 <87wmm6cgnb.fsf@jeremybryant.net>
Mime-Version: 1.0
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable
Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214";
	logging-data="19930"; mail-complaints-to="usenet@ciao.gmane.io"
Cc: 71851@debbugs.gnu.org, Paul Nelson <ultrono@gmail.com>
To: Jeremy Bryant <jb@jeremybryant.net>
Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Mon Jul 01 13:10:25 2024
Return-path: <bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org>
Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org
Original-Received: from lists.gnu.org ([209.51.188.17])
	by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
	(Exim 4.92)
	(envelope-from <bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org>)
	id 1sOEvR-0004sN-Ia
	for geb-bug-gnu-emacs@m.gmane-mx.org; Mon, 01 Jul 2024 13:10:25 +0200
Original-Received: from localhost ([::1] helo=lists1p.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.90_1)
	(envelope-from <bug-gnu-emacs-bounces@gnu.org>)
	id 1sOEvG-0000d5-Vs; Mon, 01 Jul 2024 07:10:15 -0400
Original-Received: from eggs.gnu.org ([2001:470:142:3::10])
 by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <Debian-debbugs@debbugs.gnu.org>)
 id 1sOEv4-0000Zp-NZ
 for bug-gnu-emacs@gnu.org; Mon, 01 Jul 2024 07:10:03 -0400
Original-Received: from debbugs.gnu.org ([2001:470:142:5::43])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128)
 (Exim 4.90_1) (envelope-from <Debian-debbugs@debbugs.gnu.org>)
 id 1sOEv3-0006XP-Pd
 for bug-gnu-emacs@gnu.org; Mon, 01 Jul 2024 07:10:02 -0400
Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2)
 (envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1sOEv3-0005Su-Vr
 for bug-gnu-emacs@gnu.org; Mon, 01 Jul 2024 07:10:02 -0400
X-Loop: help-debbugs@gnu.org
Resent-From: Ihor Radchenko <yantar92@posteo.net>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces@debbugs.gnu.org>
Resent-CC: bug-gnu-emacs@gnu.org
Resent-Date: Mon, 01 Jul 2024 11:10:01 +0000
Resent-Message-ID: <handler.71851.B71851.171983218220975@debbugs.gnu.org>
Resent-Sender: help-debbugs@gnu.org
X-GNU-PR-Message: followup 71851
X-GNU-PR-Package: emacs
Original-Received: via spool by 71851-submit@debbugs.gnu.org id=B71851.171983218220975
 (code B ref 71851); Mon, 01 Jul 2024 11:10:01 +0000
Original-Received: (at 71851) by debbugs.gnu.org; 1 Jul 2024 11:09:42 +0000
Original-Received: from localhost ([127.0.0.1]:60270 helo=debbugs.gnu.org)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <debbugs-submit-bounces@debbugs.gnu.org>)
 id 1sOEuj-0005SE-JO
 for submit@debbugs.gnu.org; Mon, 01 Jul 2024 07:09:42 -0400
Original-Received: from mout02.posteo.de ([185.67.36.66]:49237)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <yantar92@posteo.net>) id 1sOEug-0005S1-DD
 for 71851@debbugs.gnu.org; Mon, 01 Jul 2024 07:09:40 -0400
Original-Received: from submission (posteo.de [185.67.36.169]) 
 by mout02.posteo.de (Postfix) with ESMTPS id 842EE240101
 for <71851@debbugs.gnu.org>; Mon,  1 Jul 2024 13:09:31 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=posteo.net; s=2017;
 t=1719832171; bh=o1KSIatRQ89QlZa9nVPaML5sGXCW3ygyuoZuc0aj+Ew=;
 h=From:To:Cc:Subject:Date:Message-ID:MIME-Version:Content-Type:
 Content-Transfer-Encoding:From;
 b=DM9B7CzyWExuuwa1mhQ/ZsrybztvvOJiX0UxzHTmOW4VD7+/5qQCcrLqzstbRiQO2
 8q34hURqxSymzQh8bDdvzRAFJnS4YJYm+PMauUTGPBA1ZOEH64VV4iSnEnRUWpULqH
 H14ODSxtAqF0JgR+ag5eaqJXUo4TCxgkEUYs1Ctv4aySAYO5GsMLrncIRsDXIR7ZSK
 dcqbZKPqxZfTXJes8fBslwMJUjn00k0QEXCF5eW8THKdQ6iTrLkomB4oOTdmxo1K8U
 DXV0ljX9LzepgQVUqvIA55luMaXwndPUe3m5gTnTqujNU5GqM/0iaOwryX7EKy+dS0
 9vKwGn22H2qhg==
Original-Received: from customer (localhost [127.0.0.1])
 by submission (posteo.de) with ESMTPSA id 4WCNbZ38Hrz6tsg;
 Mon,  1 Jul 2024 13:09:30 +0200 (CEST)
In-Reply-To: <87wmm6cgnb.fsf@jeremybryant.net>
X-BeenThere: debbugs-submit@debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
X-BeenThere: bug-gnu-emacs@gnu.org
List-Id: "Bug reports for GNU Emacs,
 the Swiss army knife of text editors" <bug-gnu-emacs.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/bug-gnu-emacs>,
 <mailto:bug-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <https://lists.gnu.org/archive/html/bug-gnu-emacs>
List-Post: <mailto:bug-gnu-emacs@gnu.org>
List-Help: <mailto:bug-gnu-emacs-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/bug-gnu-emacs>,
 <mailto:bug-gnu-emacs-request@gnu.org?subject=subscribe>
Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org
Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org
Xref: news.gmane.io gmane.emacs.bugs:288244
Archived-At: <http://permalink.gmane.org/gmane.emacs.bugs/288244>

Jeremy Bryant <jb@jeremybryant.net> writes:

>> Steps to reproduce: on the latest master, Emacs -Q, evaluating
>>
>> (use-package org
>>   :custom
>>   (org-babel-load-languages '((latex . t) (emacs-lisp . t) (python . t))=
))
> ...
> Adding Ihor who may be able to review.
>
> FWIW, I tried this on 29.4 and there is no error, so this may be from a r=
ecent commit.

I was able to reproduce using exact steps, using Emacs master.
Emacs 29.4 has no problem. Loading external Org mode repo also works.

Sounds like something about autoloads? I am not sure.

The problem is triggered by

(defcustom org-babel-latex-process-alist
  `(,(cons 'png (alist-get 'dvipng org-preview-latex-process-alist)))

in ob-latex.

`org-preview-latex-process-alist' is defined in org.el and the backtrace
in the reproducer points to org.el loading ob-latex. Somehow, only on
master, `org-preview-latex-process-alist' is not available.

Debugger entered--Lisp error: (void-variable org-preview-latex-process-alis=
t)
  #f(compiled-function () #<bytecode -0x14ab3e57384cb8f6>)()
  funcall(#f(compiled-function () #<bytecode -0x14ab3e57384cb8f6>))
  eval((funcall #'#f(compiled-function () #<bytecode -0x14ab3e57384cb8f6>)))
  custom-initialize-reset(org-babel-latex-process-alist (funcall #'#f(compi=
led-function () #<bytecode -0x14ab3e57384cb8f6>)))
  custom-declare-variable(org-babel-latex-process-alist (funcall #'#f(compi=
led-function () #<bytecode -0x14ab3e57384cb8f6>)) "Definitions of external =
processes for LaTeX result generation.\nSee `org-preview-latex-process-alis=
t' for more details.\n\nThe following process symbols are recognized:\n- `p=
ng' :: Process used to produce .png output." :group org-babel :package-vers=
ion (Org . "9.7") :type (alist :tag "LaTeX to image backends" :value-type (=
plist)))
  byte-code("\300\301\302\303\304DD\305\306\307\310\311&\7\210\300\312\302\=
303\313DD\314\306\307\310\303&\7\210\300\315\302\303\316DD\317\306\307\310\=
303&\7\210\300\320\302\303\321DD\322\306\307\310\303&\7\210\300\323\302\303=
\324DD\325\306\307\310\311\326\327&\11\210\300\330\302\303\331DD\332\306\30=
7\310\333&\7\210\300\334\302\303\335DD\336\306\307\326\337\310\340&\11\207"=
 [custom-declare-variable org-babel-latex-htlatex funcall function #f(compi=
led-function () #<bytecode -0x6ca028d8a28b9ec>) "The htlatex command to ena=
ble conversion of LaTeX to SVG or HTML." :group org-babel :type string org-=
babel-latex-preamble #f(compiled-function () #<bytecode 0x7df15e625b1ebfc>)=
 "Closure which evaluates at runtime to the LaTeX preamble.\n\nIt takes 1 a=
rgument which is the parameters of the source block." org-babel-latex-begin=
-env #f(compiled-function () #<bytecode 0x7df15e625b1ebfc>) "Function that =
evaluates to the begin part of the document environment.\n\nIt takes 1 argu=
ment which is the parameters of the source block.\nThis allows adding addit=
ional code that will be ignored when\nexporting the literal LaTeX source." =
org-babel-latex-end-env #f(compiled-function () #<bytecode 0x7df15e625b1ebf=
c>) "Closure which evaluates at runtime to the end part of the document env=
ironment.\n\nIt takes 1 argument which is the parameters of the source bloc=
k.\nThis allows adding additional code that will be ignored when\nexporting=
 the literal LaTeX source." org-babel-latex-pdf-svg-process #f(compiled-fun=
ction () #<bytecode 0x79ea5ab5192d60c>) "Command to convert a PDF file to a=
n SVG file." :package-version (Org . "9.6") org-babel-latex-htlatex-package=
s #f(compiled-function () #<bytecode -0xc515f11e1fb26d2>) "Packages to use =
for htlatex export." (repeat (string)) org-babel-latex-process-alist #f(com=
piled-function () #<bytecode -0x14ab3e57384cb8f6>) "Definitions of external=
 processes for LaTeX result generation.\nSee `org-preview-latex-process-ali=
st' for more details.\n\nThe following process symbols are recognized:\n- `=
png' :: Process used to produce .png output." (Org . "9.7") (alist :tag "La=
TeX to image backends" :value-type (plist))] 10)
  org-babel-do-load-languages(org-babel-load-languages ((latex . t) (emacs-=
lisp . t) (python . t)))
  custom-initialize-reset(org-babel-load-languages (funcall #'#f(compiled-f=
unction () #<bytecode 0x18c000ae69414>)))
  custom-declare-variable(org-babel-load-languages (funcall #'#f(compiled-f=
unction () #<bytecode 0x18c000ae69414>)) "Languages which can be evaluated =
in Org buffers.\n\\<org-mode-map>\nThis list can be used to load support fo=
r any of the available\nlanguages with babel support (see info node `(org) =
Languages').  Each\nlanguage will depend on a different set of system execu=
tables and/or\nEmacs modes.\n\nWhen a language is \"loaded\", code blocks i=
n that language can\nbe evaluated with `org-babel-execute-src-block', which=
 is bound\nby default to \\[org-ctrl-c-ctrl-c].\n\nThe `org-babel-no-eval-o=
n-ctrl-c-ctrl-c' option can be set to\nremove code block evaluation from \\=
[org-ctrl-c-ctrl-c].  By\ndefault, only Emacs Lisp is loaded, since it has =
no specific\nrequirement." :group org-babel :set org-babel-do-load-language=
s :package-version (Org . "9.6") :type (alist :tag "Babel Languages" :key-t=
ype (choice (const :tag "Awk" awk) (const :tag "C, D, C++, and cpp" C) (con=
st :tag "R" R) (const :tag "Calc" calc) (const :tag "Clojure and ClojureScr=
ipt" clojure) (const :tag "CSS" css) (const :tag "Ditaa" ditaa) (const :tag=
 "Dot" dot) (const :tag "Emacs Lisp" emacs-lisp) (const :tag "Eshell" eshel=
l) (const :tag "Forth" forth) (const :tag "Fortran" fortran) (const :tag "G=
nuPlot" gnuplot) (const :tag "Groovy" groovy) (const :tag "Haskell" haskell=
) (const :tag "Java" java) (const :tag "JavaScript" js) (const :tag "Julia"=
 julia) (const :tag "LaTeX" latex) (const :tag "LilyPond" lilypond) (const =
:tag "Lisp" lisp) (const :tag "Lua" lua) (const :tag "Makefile" makefile) (=
const :tag "Maxima" maxima) (const :tag "OCaml" ocaml) (const :tag "Octave =
and MatLab" octave) (const :tag "Org" org) (const :tag "Perl" perl) (const =
:tag "Processing" processing) (const :tag "PlantUML" plantuml) (const :tag =
"Python" python) (const :tag "Ruby" ruby) (const :tag "Sass" sass) (const :=
tag "Scheme" scheme) (const :tag "Screen" screen) (const :tag "Sed" sed) (c=
onst :tag "Shell Script" shell) (const :tag "Sql" sql) (const :tag "Sqlite"=
 sqlite)) :value-type (boolean :tag "Activate" :value t)))
  byte-code("\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\13=
\210\300\316\302\303\317DD\320\314\321\322\323\306\324&\11\210\325\326\327\=
"\210\325\330\327\"\207" [custom-declare-variable org-babel-load-languages =
funcall function #f(compiled-function () #<bytecode 0x18c000ae69414>) "Lang=
uages which can be evaluated in Org buffers.\n\\<org-mode-map>\nThis list c=
an be used to load support for any of the available\nlanguages with babel s=
upport (see info node `(org) Languages').  Each\nlanguage will depend on a =
different set of system executables and/or\nEmacs modes.\n\nWhen a language=
 is \"loaded\", code blocks in that language can\nbe evaluated with `org-ba=
bel-execute-src-block', which is bound\nby default to \\[org-ctrl-c-ctrl-c]=
.\n\nThe `org-babel-no-eval-on-ctrl-c-ctrl-c' option can be set to\nremove =
code block evaluation from \\[org-ctrl-c-ctrl-c].  By\ndefault, only Emacs =
Lisp is loaded, since it has no specific\nrequirement." :group org-babel :s=
et org-babel-do-load-languages :package-version (Org . "9.6") :type (alist =
:tag "Babel Languages" :key-type (choice (const :tag "Awk" awk) (const :tag=
 "C, D, C++, and cpp" C) (const :tag "R" R) (const :tag "Calc" calc) (const=
 :tag "Clojure and ClojureScript" clojure) (const :tag "CSS" css) (const :t=
ag "Ditaa" ditaa) (const :tag "Dot" dot) (const :tag "Emacs Lisp" emacs-lis=
p) (const :tag "Eshell" eshell) (const :tag "Forth" forth) (const :tag "For=
tran" fortran) (const :tag "GnuPlot" gnuplot) (const :tag "Groovy" groovy) =
(const :tag "Haskell" haskell) (const :tag "Java" java) (const :tag "JavaSc=
ript" js) (const :tag "Julia" julia) (const :tag "LaTeX" latex) (const :tag=
 "LilyPond" lilypond) (const :tag "Lisp" lisp) (const :tag "Lua" lua) (cons=
t :tag "Makefile" makefile) (const :tag "Maxima" maxima) (const :tag "OCaml=
" ocaml) (const :tag "Octave and MatLab" octave) (const :tag "Org" org) (co=
nst :tag "Perl" perl) (const :tag "Processing" processing) (const :tag "Pla=
ntUML" plantuml) (const :tag "Python" python) (const :tag "Ruby" ruby) (con=
st :tag "Sass" sass) (const :tag "Scheme" scheme) (const :tag "Screen" scre=
en) (const :tag "Sed" sed) (const :tag "Shell Script" shell) (const :tag "S=
ql" sql) (const :tag "Sqlite" sqlite)) :value-type (boolean :tag "Activate"=
 :value t)) org-clone-delete-id #f(compiled-function () #<bytecode 0x18c000=
ae69414>) "Remove ID property of clones of a subtree.\nWhen non-nil, clones=
 of a subtree don't inherit the ID property.\nOtherwise they inherit the ID=
 property with a new unique\nidentifier." boolean :version "24.1" org-id au=
toload org-release "org-version.el" org-git-version] 12)
  require(org nil t)
  (not (require 'org nil t))
  (if (not (require 'org nil t)) (display-warning 'use-package (format "Can=
not load %s" 'org) :error))
  (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package c=
ustom-known-themes) nil (custom-declare-theme 'use-package 'use-package-the=
me nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (rem=
q 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-pa=
ckage '(org-babel-load-languages '((latex . t) (emacs-lisp . t) (python . t=
)) nil nil "Customized with use-package org"))) (if (not (require 'org nil =
t)) (display-warning 'use-package (format "Cannot load %s" 'org) :error)))
  (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if =
(memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-pack=
age 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom=
-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-s=
et-variables 'use-package '(org-babel-load-languages '(... ... ...) nil nil=
 "Customized with use-package org"))) (if (not (require 'org nil t)) (displ=
ay-warning 'use-package (format "Cannot load %s" 'org) :error))) ((debug er=
ror) (funcall use-package--warning1 :catch err)))
  (progn (defvar use-package--warning1 #'(lambda (keyword err) (let ((msg (=
format "%s/%s: %s" ... keyword ...))) (display-warning 'use-package msg :er=
ror)))) (condition-case err (progn (let ((custom--inhibit-theme-enable nil)=
) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'us=
e-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq =
custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-t=
heme-set-variables 'use-package '(org-babel-load-languages '... nil nil "Cu=
stomized with use-package org"))) (if (not (require 'org nil t)) (display-w=
arning 'use-package (format "Cannot load %s" 'org) :error))) ((debug error)=
 (funcall use-package--warning1 :catch err))))
  (progn (progn (defvar use-package--warning1 #'(lambda (keyword err) (let =
((msg ...)) (display-warning 'use-package msg :error)))) (condition-case er=
r (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package c=
ustom-known-themes) nil (custom-declare-theme 'use-package 'use-package-the=
me nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (rem=
q ... custom-enabled-themes))) (custom-theme-set-variables 'use-package '(o=
rg-babel-load-languages ... nil nil "Customized with use-package org"))) (i=
f (not (require 'org nil t)) (display-warning 'use-package (format "Cannot =
load %s" 'org) :error))) ((debug error) (funcall use-package--warning1 :cat=
ch err)))))
  eval((progn (progn (defvar use-package--warning1 #'(lambda (keyword err) =
(let (...) (display-warning ... msg :error)))) (condition-case err (progn (=
let ((custom--inhibit-theme-enable nil)) (if (memq ... custom-known-themes)=
 nil (custom-declare-theme ... ... nil ...) (enable-theme ...) (setq custom=
-enabled-themes ...)) (custom-theme-set-variables 'use-package '...)) (if (=
not (require ... nil t)) (display-warning 'use-package (format "Cannot load=
 %s" ...) :error))) ((debug error) (funcall use-package--warning1 :catch er=
r))))) t)
  elisp--eval-last-sexp(nil)
  #f(compiled-function () #<bytecode 0xf626b78376ca>)()
  eval-last-sexp(nil)
  funcall-interactively(eval-last-sexp nil)
  command-execute(eval-last-sexp)


--=20
Ihor Radchenko // yantar92,
Org mode contributor,
Learn more about Org mode at <https://orgmode.org/>.
Support Org development at <https://liberapay.com/org-mode>,
or support my work at <https://liberapay.com/yantar92>