From f58a2cb5d22c5931581274db1f0ec85ac903b747 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Mon, 28 Oct 2019 20:03:50 +0100
Subject: 2019-10-28 18:22:00

---
 tex/context/base/mkiv/typo-del.mkiv | 15 +++++++++++----
 1 file changed, 11 insertions(+), 4 deletions(-)

(limited to 'tex/context/base/mkiv/typo-del.mkiv')

diff --git a/tex/context/base/mkiv/typo-del.mkiv b/tex/context/base/mkiv/typo-del.mkiv
index 2ce98841e..9320c37ee 100644
--- a/tex/context/base/mkiv/typo-del.mkiv
+++ b/tex/context/base/mkiv/typo-del.mkiv
@@ -674,22 +674,29 @@
    \dostoptagged}
 
 \def\typo_delimited_nextleft_symbol#1%
-  {\localleftbox\bgroup
+  {\let\typo_delimited_reset_next_symbol\typo_delimited_reset_next_symbol_indeed
+   \localleftbox\bgroup
      \swapmacros\leftboundarycharacter\rightboundarycharacter
      \boundarycharactermode\plusone
      \typo_delimited_left_symbol#1%
    \egroup}
 
 \def\typo_delimited_nextright_symbol#1%
-  {\localrightbox\bgroup
+  {\let\typo_delimited_reset_next_symbol\typo_delimited_reset_next_symbol_indeed
+   \localrightbox\bgroup
      \swapmacros\leftboundarycharacter\rightboundarycharacter
      \boundarycharactermode\plusone
      \typo_delimited_right_symbol#1%
    \egroup}
 
+\unexpanded\def\typo_delimited_reset_next_symbol_indeed
+  {\localleftbox {}%
+   \localrightbox{}}%
+
+\let\typo_delimited_reset_next_symbol\relax
+
 \appendtoks
-    \localleftbox {}%
-    \localrightbox{}%
+    \typo_delimited_reset_next_symbol
 \to \everyforgetall
 
 % \starttext
-- 
cgit v1.2.3