From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <emacs-orgmode-bounces+larch=yhetil.org@gnu.org>
Received: from mp10.migadu.com ([2001:41d0:306:2d92::])
	(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits))
	by ms9.migadu.com with LMTPS
	id EIL/Dqty32S0QgEASxT56A
	(envelope-from <emacs-orgmode-bounces+larch=yhetil.org@gnu.org>)
	for <larch@yhetil.org>; Fri, 18 Aug 2023 15:31:23 +0200
Received: from aspmx1.migadu.com ([2001:41d0:306:2d92::])
	(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits))
	by mp10.migadu.com with LMTPS
	id KArFDaty32TsZgAAG6o9tA
	(envelope-from <emacs-orgmode-bounces+larch=yhetil.org@gnu.org>)
	for <larch@yhetil.org>; Fri, 18 Aug 2023 15:31:23 +0200
Received: from lists.gnu.org (lists.gnu.org [209.51.188.17])
	(using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits))
	(No client certificate requested)
	by aspmx1.migadu.com (Postfix) with ESMTPS id B793D35791
	for <larch@yhetil.org>; Fri, 18 Aug 2023 15:31:22 +0200 (CEST)
Authentication-Results: aspmx1.migadu.com;
	dkim=pass header.d=mailfence.com header.s=20210208-e7xh header.b=jaOTK112;
	spf=pass (aspmx1.migadu.com: domain of "emacs-orgmode-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="emacs-orgmode-bounces+larch=yhetil.org@gnu.org";
	dmarc=pass (policy=quarantine) header.from=mailfence.com
ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org;
	s=key1; t=1692365482;
	h=from:from:sender:sender:reply-to:subject:subject:date:date:
	 message-id:message-id:to:to:cc:mime-version:mime-version:
	 content-type:content-type:
	 content-transfer-encoding:content-transfer-encoding:list-id:list-help:
	 list-unsubscribe:list-subscribe:list-post:dkim-signature;
	bh=bPR0PtZfUmEwOTjWu7vzWn8jyD1CtJ4Fr1eOo1iYuIc=;
	b=mxMOq20DdBokgmTVCCgYeIMGkZSxndekdLpA2trrAERCGG1PVDcM40BP8V01Ibf85NDPvI
	CVYPGp6LF4lZE4q1Fy/jGvM4zjKy3V3FBO3qPi3abGpwm/APde2SfUQbG5TtH9qFjPXGAc
	sBFKTHT8JfCoQXSbEZH/FBvu7/2Ev1aLwXPD8I5dLqVabiNidhdDkFOITHymc/7V5sxVBT
	fJYuxqdHWsaBt04m6x5dAhut0SpboZPi9ZjZAcJFM7QjcL3ZmBRKcTEW+LNhwzXwnnGfuf
	fZh9/Ly87s6dOzyVPMsOG1fZvk0XwJi4cBg0wnPcgp6jy+FT6whpztpcc0JkEA==
ARC-Authentication-Results: i=1;
	aspmx1.migadu.com;
	dkim=pass header.d=mailfence.com header.s=20210208-e7xh header.b=jaOTK112;
	spf=pass (aspmx1.migadu.com: domain of "emacs-orgmode-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="emacs-orgmode-bounces+larch=yhetil.org@gnu.org";
	dmarc=pass (policy=quarantine) header.from=mailfence.com
ARC-Seal: i=1; s=key1; d=yhetil.org; t=1692365482; a=rsa-sha256; cv=none;
	b=Cxyc0yoH3zsc0fjEWaRA1QjdeSlV2lSN52dFdE4uMRgWrIiGy38CLifPl72waJMyrvhOAk
	LE1EFI8rGp+JjPz2863Mzp5tSDZ6AampxmXKOBnFIFCrzSSLB0R2ChFt3DkXPtzMlovid+
	/p/mykn83fpzW+P8TSSKmgR7+UADKQwWaeA72PycU/603ivjwV5mweqeJUJbBj7G5ChkfI
	IyS0e+OzSW71WmirLh/OKUeBk/DkgqbQnVTbmleLRPjmf+FHp1++zPDRil2xkBOH5+A0rs
	u0Vcr/R4If+IYZ6x7jqX4ebjHZJ7zTrO8/v3DJ/0lkOsnfzgODx8yykUyTtl5A==
Received: from localhost ([::1] helo=lists1p.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.90_1)
	(envelope-from <emacs-orgmode-bounces@gnu.org>)
	id 1qWzYa-0003hx-0H; Fri, 18 Aug 2023 09:30:28 -0400
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 <edgarlux@mailfence.com>)
 id 1qWzPI-0000wm-FI
 for emacs-orgmode@gnu.org; Fri, 18 Aug 2023 09:20:52 -0400
Received: from wilbur.contactoffice.com ([212.3.242.68])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <edgarlux@mailfence.com>)
 id 1qWzPE-0008Bi-H2
 for emacs-orgmode@gnu.org; Fri, 18 Aug 2023 09:20:52 -0400
Received: from ichabod.co-bxl (ichabod.co-bxl [10.2.0.36])
 by wilbur.contactoffice.com (Postfix) with ESMTP id 356362B6
 for <emacs-orgmode@gnu.org>; Fri, 18 Aug 2023 15:20:42 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1692364842; 
 s=20210208-e7xh; d=mailfence.com; i=edgarlux@mailfence.com;
 h=Date:Message-ID:MIME-Version:Content-Type:Subject:From:Content-Transfer-Encoding:To;
 l=19269; bh=bPR0PtZfUmEwOTjWu7vzWn8jyD1CtJ4Fr1eOo1iYuIc=;
 b=jaOTK112/zLQdrre3c2BQJBFkkjBl0Vni0sRQPWsdUXZHeigRX/Df4IgYioFgd/P
 y7lMfozGcqTd7lxCTxtI0rUSFg3M5Lyc8qcAvrpz7KziAQR5UDisIZHvAtgA7jG9E+7
 6GJb1KOY2OQWGdTzET16lPqr3+yMK1tSGmxKntilSAjsTEHYSL1a5ORPMbFpWxEGJ+z
 VldElN8HaZBDZHpKQ2G+sfLlyZdMeWJcMDnRERYkcrXqcvzk/pCVNLAz+9ErqiGHmUl
 Uvl0hV5DoFmMApmnVeV5h3QLOkpsOePKW2CM7jUx389/+OLVYl/SPYIMkab72ygIrQk
 JAj1gA/h1w==
Date: Fri, 18 Aug 2023 15:20:37 +0200 (CEST)
Message-ID: <1650384805.753459.1692364837267@ichabod.co-bxl>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Subject: [BUG] Warning when creating preview
From: Edgar Lux <edgarlux@mailfence.com>
Content-Transfer-Encoding: quoted-printable
To: Emacs Orgmode <emacs-orgmode@gnu.org>
X-Mailer: ContactOffice Mail
X-ContactOffice-Account: com:195124330
Received-SPF: pass client-ip=212.3.242.68; envelope-from=edgarlux@mailfence.com;
 helo=wilbur.contactoffice.com
X-Spam_score_int: -27
X-Spam_score: -2.8
X-Spam_bar: --
X-Spam_report: (-2.8 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
 DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1,
 RCVD_IN_DNSWL_LOW=-0.7, SPF_HELO_NONE=0.001,
 SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-BeenThere: emacs-orgmode@gnu.org
X-Mailman-Version: 2.1.29
Precedence: list
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
 <mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <https://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
 <mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Errors-To: emacs-orgmode-bounces+larch=yhetil.org@gnu.org
Sender: emacs-orgmode-bounces+larch=yhetil.org@gnu.org
X-Migadu-Country: US
X-Migadu-Flow: FLOW_IN
X-Migadu-Scanner: mx2.migadu.com
X-Migadu-Spam-Score: -6.69
X-Spam-Score: -6.69
X-Migadu-Queue-Id: B793D35791
X-TUID: M1YQ7txa/Hcm

Hi,

I don't really need help with this. Org has been telling me for days that I=
 should report this, but I don't really want to share my configuration publ=
icly, and I thought that it was only for a file on which I was working. It =
seems to be general for my configuration. I hope that it helps. If you have=
 an encrypted personal account to which I can send my config file, let me k=
now.

* What happens

When I type some equations and get the preview, I get this warning

#+begin_quote
\begin{gather}
t =3D 0
\end{gather}
#+end_quote

* My "system"

Emacs  : GNU Emacs 28.2 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.36=
, cairo version 1.17.6)
 of 2023-01-03
Package: Org mode version 9.4.6 (release_9.4.6-13-g4be129)

* The message

Warning (org-element-cache): org-element--cache: Org parser error in t.org:=
:35. Resetting.
 The error was: (error "Invalid search bound (wrong side of point)")
 Backtrace:
"  backtrace-to-string(nil)
  (progn (backtrace-to-string (backtrace-get-frames 'backtrace)))
  (if (and (fboundp 'backtrace-get-frames) (fboundp 'backtrace-to-string)) =
(progn (backtrace-to-string (backtrace-get-frames 'backtrace))))
  (format \"Org parser error in %s::%S. Resetting.\\n The error ...\" (buff=
er-name (current-buffer)) epom err (if (and (fboundp 'backtrace-get-frames)=
 (fboundp 'backtrace-to-string)) (progn (backtrace-to-string (backtrace-get=
-frames 'backtrace)))))
  (let* ((format-string (format \"Org parser error in %s::%S. Resetting.\\n=
 The error ...\" (buffer-name (current-buffer)) epom err (if (and (fboundp =
'backtrace-get-frames) (fboundp 'backtrace-to-string)) (progn (backtrace-to=
-string (backtrace-get-frames ...)))))) (format-string (if (or (not org-ele=
ment--cache-diagnostics-ring) (not (eq 'backtrace org-element--cache-self-v=
erify))) format-string (prog1 (concat (format \"Warning(%s): \" (buffer-nam=
e ...)) format-string \"\\nBacktrace:\\n  \" (mapconcat #'identity (ring-el=
ements org-element--cache-diagnostics-ring) \"\\n  \")) (setq org-element--=
cache-diagnostics-ring nil))))) (if (and (boundp 'org-batch-test) org-batch=
-test) (error \"%s\" (concat \"org-element--cache: \" format-string)) (disp=
lay-warning 'org-element-cache (concat \"org-element--cache: \" format-stri=
ng))))
  (condition-case err (org-element--parse-to epom) ((debug error) (let* ((f=
ormat-string (format \"Org parser error in %s::%S. Resetting.\\n The error =
...\" (buffer-name (current-buffer)) epom err (if (and ... ...) (progn ...)=
))) (format-string (if (or (not org-element--cache-diagnostics-ring) (not .=
..)) format-string (prog1 (concat ... format-string \"\\nBacktrace:\\n  \" =
...) (setq org-element--cache-diagnostics-ring nil))))) (if (and (boundp 'o=
rg-batch-test) org-batch-test) (error \"%s\" (concat \"org-element--cache: =
\" format-string)) (display-warning 'org-element-cache (concat \"org-elemen=
t--cache: \" format-string)))) (org-element-cache-reset) (org-element--pars=
e-to epom)))
  (if cached-only (if (and (org-element--cache-active-p) (or (not org-eleme=
nt--cache-sync-requests) (< epom (aref (car org-element--cache-sync-request=
s) 1)))) (progn (org-element--cache-find epom))) (condition-case err (org-e=
lement--parse-to epom) ((debug error) (let* ((format-string (format \"Org p=
arser error in %s::%S. Resetting.\\n The error ...\" (buffer-name ...) epom=
 err (if ... ...))) (format-string (if (or ... ...) format-string (prog1 ..=
. ...)))) (if (and (boundp 'org-batch-test) org-batch-test) (error \"%s\" (=
concat \"org-element--cache: \" format-string)) (display-warning 'org-eleme=
nt-cache (concat \"org-element--cache: \" format-string)))) (org-element-ca=
che-reset) (org-element--parse-to epom))))
  (setq element (if cached-only (if (and (org-element--cache-active-p) (or =
(not org-element--cache-sync-requests) (< epom (aref (car org-element--cach=
e-sync-requests) 1)))) (progn (org-element--cache-find epom))) (condition-c=
ase err (org-element--parse-to epom) ((debug error) (let* ((format-string (=
format \"Org parser error in %s::%S. Resetting.\\n The error ...\" ... epom=
 err ...)) (format-string (if ... format-string ...))) (if (and (boundp ...=
) org-batch-test) (error \"%s\" (concat \"org-element--cache: \" format-str=
ing)) (display-warning 'org-element-cache (concat \"org-element--cache: \" =
format-string)))) (org-element-cache-reset) (org-element--parse-to epom))))=
)
  (let (element) (if (org-element--cache-active-p) (progn (if (not org-elem=
ent--cache) (org-element-cache-reset) (if cached-only nil (org-element--cac=
he-sync (current-buffer) epom))))) (setq element (if cached-only (if (and (=
org-element--cache-active-p) (or (not org-element--cache-sync-requests) (< =
epom (aref ... 1)))) (progn (org-element--cache-find epom))) (condition-cas=
e err (org-element--parse-to epom) ((debug error) (let* ((format-string ...=
) (format-string ...)) (if (and ... org-batch-test) (error \"%s\" ...) (dis=
play-warning ... ...))) (org-element-cache-reset) (org-element--parse-to ep=
om))))) (if (and (org-element--cache-active-p) element (org-element--cache-=
verify-element element)) (progn (setq element (org-element--parse-to epom))=
)) (if (eq (org-element-type element t) 'org-data) nil (if (and cached-only=
 (not (and element (or (=3D epom ...) (and ... ... ...) (and ... ... ...) (=
and ... ... ...))))) nil (if (not (eq (org-element-type element t) 'section=
)) element (org-element-at-point (1+ epom) cached-only)))))
  (save-restriction (widen) (goto-char (or --mepom (point))) (if (and cache=
d-only (memq this-command org-element--cache-non-modifying-commands)) (prog=
n (setq cached-only nil))) (let (element) (if (org-element--cache-active-p)=
 (progn (if (not org-element--cache) (org-element-cache-reset) (if cached-o=
nly nil (org-element--cache-sync (current-buffer) epom))))) (setq element (=
if cached-only (if (and (org-element--cache-active-p) (or (not org-element-=
-cache-sync-requests) (< epom ...))) (progn (org-element--cache-find epom))=
) (condition-case err (org-element--parse-to epom) ((debug error) (let* (..=
. ...) (if ... ... ...)) (org-element-cache-reset) (org-element--parse-to e=
pom))))) (if (and (org-element--cache-active-p) element (org-element--cache=
-verify-element element)) (progn (setq element (org-element--parse-to epom)=
))) (if (eq (org-element-type element t) 'org-data) nil (if (and cached-onl=
y (not (and element (or ... ... ... ...)))) nil (if (not (eq (org-element-t=
ype element t) 'section)) element (org-element-at-point (1+ epom) cached-on=
ly))))))
  (save-excursion (save-restriction (widen) (goto-char (or --mepom (point))=
) (if (and cached-only (memq this-command org-element--cache-non-modifying-=
commands)) (progn (setq cached-only nil))) (let (element) (if (org-element-=
-cache-active-p) (progn (if (not org-element--cache) (org-element-cache-res=
et) (if cached-only nil (org-element--cache-sync ... epom))))) (setq elemen=
t (if cached-only (if (and (org-element--cache-active-p) (or ... ...)) (pro=
gn (org-element--cache-find epom))) (condition-case err (org-element--parse=
-to epom) ((debug error) (let* ... ...) (org-element-cache-reset) (org-elem=
ent--parse-to epom))))) (if (and (org-element--cache-active-p) element (org=
-element--cache-verify-element element)) (progn (setq element (org-element-=
-parse-to epom)))) (if (eq (org-element-type element t) 'org-data) nil (if =
(and cached-only (not (and element ...))) nil (if (not (eq ... ...)) elemen=
t (org-element-at-point (1+ epom) cached-only)))))))
  (save-excursion (cond ((markerp --mepom) (set-buffer (marker-buffer --mep=
om))) ((numberp --mepom)) (t (if (let* ((parray (and t ...))) (if parray (l=
et* (...) (if ... ... ...)) (let* (...) (cond ... ... ...)))) (progn (set-b=
uffer (let* (...) (if parray ... ...))))) (setq --mepom (let* ((parray (and=
 t ...))) (if parray (let* (...) (if ... ... ...)) (let* (...) (cond ... ..=
. ...))))))) (save-excursion (save-restriction (widen) (goto-char (or --mep=
om (point))) (if (and cached-only (memq this-command org-element--cache-non=
-modifying-commands)) (progn (setq cached-only nil))) (let (element) (if (o=
rg-element--cache-active-p) (progn (if (not org-element--cache) (org-elemen=
t-cache-reset) (if cached-only nil ...)))) (setq element (if cached-only (i=
f (and ... ...) (progn ...)) (condition-case err (org-element--parse-to epo=
m) (... ... ... ...)))) (if (and (org-element--cache-active-p) element (org=
-element--cache-verify-element element)) (progn (setq element (org-element-=
-parse-to epom)))) (if (eq (org-element-type element t) 'org-data) nil (if =
(and cached-only (not ...)) nil (if (not ...) element (org-element-at-point=
 ... cached-only))))))))
  (let ((--mepom epom)) (save-excursion (cond ((markerp --mepom) (set-buffe=
r (marker-buffer --mepom))) ((numberp --mepom)) (t (if (let* ((parray ...))=
 (if parray (let* ... ...) (let* ... ...))) (progn (set-buffer (let* ... ..=
.)))) (setq --mepom (let* ((parray ...)) (if parray (let* ... ...) (let* ..=
. ...)))))) (save-excursion (save-restriction (widen) (goto-char (or --mepo=
m (point))) (if (and cached-only (memq this-command org-element--cache-non-=
modifying-commands)) (progn (setq cached-only nil))) (let (element) (if (or=
g-element--cache-active-p) (progn (if ... ... ...))) (setq element (if cach=
ed-only (if ... ...) (condition-case err ... ...))) (if (and (org-element--=
cache-active-p) element (org-element--cache-verify-element element)) (progn=
 (setq element ...))) (if (eq (org-element-type element t) 'org-data) nil (=
if (and cached-only ...) nil (if ... element ...))))))))
  (if (org-element-type epom t) epom (setq epom (or epom (point))) (let ((-=
-mepom epom)) (save-excursion (cond ((markerp --mepom) (set-buffer (marker-=
buffer --mepom))) ((numberp --mepom)) (t (if (let* (...) (if parray ... ...=
)) (progn (set-buffer ...))) (setq --mepom (let* (...) (if parray ... ...))=
))) (save-excursion (save-restriction (widen) (goto-char (or --mepom (point=
))) (if (and cached-only (memq this-command org-element--cache-non-modifyin=
g-commands)) (progn (setq cached-only nil))) (let (element) (if (org-elemen=
t--cache-active-p) (progn ...)) (setq element (if cached-only ... ...)) (if=
 (and ... element ...) (progn ...)) (if (eq ... ...) nil (if ... nil ...)))=
)))))
  org-element-at-point()
  (or element (org-element-at-point))
  (let* ((pos (point)) (element (or element (org-element-at-point))) (type =
(org-element-type element)) (post (org-element-post-affiliated element))) (=
cond ((and post (< pos post)) (forward-line 0) (let ((case-fold-search t)) =
(looking-at org-element--affiliated-re)) (cond ((not (member-ignore-case (m=
atch-string 1) org-element-parsed-keywords)) (throw 'objects-forbidden elem=
ent)) ((< (match-end 0) pos) (narrow-to-region (match-end 0) (line-end-posi=
tion))) ((and (match-beginning 2) (>=3D pos (match-beginning 2)) (< pos (ma=
tch-end 2))) (narrow-to-region (match-beginning 2) (match-end 2))) (t (thro=
w 'objects-forbidden element))) (setq type 'keyword)) ((eq type 'item) (let=
 ((tag (org-element--property :tag element nil nil))) (if (or (not tag) (/=
=3D (line-beginning-position) post)) (throw 'objects-forbidden element) (fo=
rward-line 0) (search-forward tag (line-end-position)) (goto-char (match-be=
ginning 0)) (if (and (>=3D pos ...) (< pos ...)) (narrow-to-region (point) =
(match-end 0)) (throw 'objects-forbidden element))))) ((memq type '(headlin=
e inlinetask)) (let ((case-fold-search nil)) (goto-char (org-element-begin =
element)) (looking-at org-complex-heading-regexp) (let ((end (match-end 4))=
) (if (not end) (throw 'objects-forbidden element) (goto-char (match-beginn=
ing 4)) (if (looking-at org-element-comment-string) (progn ...)) (if (>=3D =
... end) (throw ... element) (narrow-to-region ... end)))))) ((memq type '(=
paragraph table-row verse-block)) (let ((cbeg (org-element-contents-begin e=
lement)) (cend (org-element-contents-end element))) (if (and cbeg cend (>=
=3D pos cbeg) (or (< pos cend) (and ... ...))) (narrow-to-region cbeg cend)=
 (throw 'objects-forbidden element)))) (t (throw 'objects-forbidden element=
))) (goto-char (point-min)) (let ((restriction (org-element-restriction typ=
e)) (parent element) last) (catch 'exit (while t (let ((next (org-element--=
object-lex restriction))) (if next (progn (if ... ... ...))) (if (or (not n=
ext) (> ... pos)) (throw 'exit (or last parent)) (let (... ... ...) (cond .=
.. ... ...))))))))
  (save-restriction (widen) (let* ((pos (point)) (element (or element (org-=
element-at-point))) (type (org-element-type element)) (post (org-element-po=
st-affiliated element))) (cond ((and post (< pos post)) (forward-line 0) (l=
et ((case-fold-search t)) (looking-at org-element--affiliated-re)) (cond ((=
not (member-ignore-case ... org-element-parsed-keywords)) (throw 'objects-f=
orbidden element)) ((< (match-end 0) pos) (narrow-to-region (match-end 0) (=
line-end-position))) ((and (match-beginning 2) (>=3D pos ...) (< pos ...)) =
(narrow-to-region (match-beginning 2) (match-end 2))) (t (throw 'objects-fo=
rbidden element))) (setq type 'keyword)) ((eq type 'item) (let ((tag (org-e=
lement--property :tag element nil nil))) (if (or (not tag) (/=3D ... post))=
 (throw 'objects-forbidden element) (forward-line 0) (search-forward tag (l=
ine-end-position)) (goto-char (match-beginning 0)) (if (and ... ...) (narro=
w-to-region ... ...) (throw ... element))))) ((memq type '(headline inlinet=
ask)) (let ((case-fold-search nil)) (goto-char (org-element-begin element))=
 (looking-at org-complex-heading-regexp) (let ((end ...)) (if (not end) (th=
row ... element) (goto-char ...) (if ... ...) (if ... ... ...))))) ((memq t=
ype '(paragraph table-row verse-block)) (let ((cbeg (org-element-contents-b=
egin element)) (cend (org-element-contents-end element))) (if (and cbeg cen=
d (>=3D pos cbeg) (or ... ...)) (narrow-to-region cbeg cend) (throw 'object=
s-forbidden element)))) (t (throw 'objects-forbidden element))) (goto-char =
(point-min)) (let ((restriction (org-element-restriction type)) (parent ele=
ment) last) (catch 'exit (while t (let ((next ...)) (if next (progn ...)) (=
if (or ... ...) (throw ... ...) (let ... ...))))))))
  (save-excursion (save-restriction (widen) (let* ((pos (point)) (element (=
or element (org-element-at-point))) (type (org-element-type element)) (post=
 (org-element-post-affiliated element))) (cond ((and post (< pos post)) (fo=
rward-line 0) (let ((case-fold-search t)) (looking-at org-element--affiliat=
ed-re)) (cond ((not ...) (throw ... element)) ((< ... pos) (narrow-to-regio=
n ... ...)) ((and ... ... ...) (narrow-to-region ... ...)) (t (throw ... el=
ement))) (setq type 'keyword)) ((eq type 'item) (let ((tag ...)) (if (or ..=
. ...) (throw ... element) (forward-line 0) (search-forward tag ...) (goto-=
char ...) (if ... ... ...)))) ((memq type '(headline inlinetask)) (let ((ca=
se-fold-search nil)) (goto-char (org-element-begin element)) (looking-at or=
g-complex-heading-regexp) (let (...) (if ... ... ... ... ...)))) ((memq typ=
e '(paragraph table-row verse-block)) (let ((cbeg ...) (cend ...)) (if (and=
 cbeg cend ... ...) (narrow-to-region cbeg cend) (throw ... element)))) (t =
(throw 'objects-forbidden element))) (goto-char (point-min)) (let ((restric=
tion (org-element-restriction type)) (parent element) last) (catch 'exit (w=
hile t (let (...) (if next ...) (if ... ... ...))))))))
  (catch 'objects-forbidden (save-excursion (save-restriction (widen) (let*=
 ((pos (point)) (element (or element (org-element-at-point))) (type (org-el=
ement-type element)) (post (org-element-post-affiliated element))) (cond ((=
and post (< pos post)) (forward-line 0) (let (...) (looking-at org-element-=
-affiliated-re)) (cond (... ...) (... ...) (... ...) (t ...)) (setq type 'k=
eyword)) ((eq type 'item) (let (...) (if ... ... ... ... ... ...))) ((memq =
type '...) (let (...) (goto-char ...) (looking-at org-complex-heading-regex=
p) (let ... ...))) ((memq type '...) (let (... ...) (if ... ... ...))) (t (=
throw 'objects-forbidden element))) (goto-char (point-min)) (let ((restrict=
ion (org-element-restriction type)) (parent element) last) (catch 'exit (wh=
ile t (let ... ... ...))))))))
  org-element-context()
  (let ((datum (org-element-context))) (and (memq (org-element-type datum t=
) '(latex-environment latex-fragment)) (let ((beg (org-element-begin datum)=
) (end (org-element-end datum))) (if (org-clear-latex-preview beg end) (mes=
sage \"LaTeX preview removed\") (message \"Creating LaTeX preview...\") (or=
g--latex-preview-region beg end) (message \"Creating LaTeX preview... done.=
\")) t)))
  (cond ((not (display-graphic-p)) nil) ((equal arg '(64)) (org-clear-latex=
-preview (point-min) (point-max)) (message \"LaTeX previews removed from bu=
ffer\")) ((equal arg '(16)) (message \"Creating LaTeX previews in buffer...=
\") (org--latex-preview-region (point-min) (point-max)) (message \"Creating=
 LaTeX previews in buffer... done.\")) ((equal arg '(4)) (org-clear-latex-p=
review (if (use-region-p) (region-beginning) (if (org-before-first-heading-=
p) (point-min) (save-excursion (progn (defvar org-called-with-limited-level=
s) (defvar org-outline-regexp) (defvar outline-regexp) (defvar org-outline-=
regexp-bol) (let* ... ... ...))))) (if (use-region-p) (region-end) (progn (=
defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar =
outline-regexp) (defvar org-outline-regexp-bol) (let* ((org-called-with-lim=
ited-levels t) (org-outline-regexp ...) (outline-regexp org-outline-regexp)=
 (org-outline-regexp-bol ...)) (org-entry-end-position)))))) ((use-region-p=
) (message \"Creating LaTeX previews in region...\") (org--latex-preview-re=
gion (region-beginning) (region-end)) (message \"Creating LaTeX previews in=
 region... done.\")) ((let ((datum (org-element-context))) (and (memq (org-=
element-type datum t) '(latex-environment latex-fragment)) (let ((beg (org-=
element-begin datum)) (end (org-element-end datum))) (if (org-clear-latex-p=
review beg end) (message \"LaTeX preview removed\") (message \"Creating LaT=
eX preview...\") (org--latex-preview-region beg end) (message \"Creating La=
TeX preview... done.\")) t)))) (t (let ((beg (if (org-before-first-heading-=
p) (point-min) (save-excursion (progn ... ... ... ... ...)))) (end (progn (=
defvar org-called-with-limited-levels) (defvar org-outline-regexp) (defvar =
outline-regexp) (defvar org-outline-regexp-bol) (let* (... ... ... ...) (or=
g-entry-end-position))))) (message \"Creating LaTeX previews in section...\=
") (org--latex-preview-region beg end) (message \"Creating LaTeX previews i=
n section... done.\"))))
  org-latex-preview(nil)
  funcall-interactively(org-latex-preview nil)
  call-interactively(org-latex-preview nil nil)
  command-execute(org-latex-preview)
"
 Please report this to Org mode mailing list (M-x org-submit-bug-report). D=
isable showing Disable logging


--=20
Sent with https://mailfence.com =20
Secure and private email