# HG changeset patch
# User wenzelm
# Date 1726139639 -7200
# Node ID 87395be1a299744eefb68041b933f2edb7f16778
# Parent  0ed02f473cf94ceb222a674cce4c512c412cdce2
clarified print_mode (again, amending 9de19e3a7231): support e.g. 'thm ("") symmetric' for formatting in ML and without markup;

diff -r 0ed02f473cf9 -r 87395be1a299 src/Pure/General/print_mode.ML
--- a/src/Pure/General/print_mode.ML	Thu Sep 12 13:10:36 2024 +0200
+++ b/src/Pure/General/print_mode.ML	Thu Sep 12 13:13:59 2024 +0200
@@ -55,7 +55,8 @@
 
 fun add_modes modes = Unsynchronized.change print_mode (append modes);
 
-fun PIDE_enabled () = print_mode_active PIDE;
+fun PIDE_enabled () =
+  find_first (fn mode => mode = PIDE orelse mode = "") (print_mode_value ()) = SOME PIDE;
 
 end;