From eb4e0ef62c19f07ed55eb7de6d6fc41f80e48d3f Mon Sep 17 00:00:00 2001
From: Makarius Wenzel
Date: Wed, 5 Apr 2000 20:25:05 +0000
Subject: improved print_mode switch;

---
 isa/isa.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'isa')

diff --git a/isa/isa.el b/isa/isa.el
index 1bdb7a91..acbb2b75 100644
--- a/isa/isa.el
+++ b/isa/isa.el
@@ -637,8 +637,8 @@ you will be asked to retract the file or process the remainder of it."
       ;; fontification for tokens themselves  (FIXME: broken)
       '(("\\\\<[A-Za-z][A-Za-z0-9_']*>" (0 font-lock-type-face)))
       proof-xsym-activate-command
-      "print_mode := (!print_mode union [\"xsymbols\",\"symbols\"])"
+      "print_mode := ([\"xsymbols\",\"symbols\"] @ ! print_mode)"
       proof-xsym-deactivate-command
-      "print_mode := filter_out (fn x=>(rev (explode \"symbols\") prefix rev (explode x))) (!print_mode)")
+      "print_mode := (! print_mode \\\\ [\"xsymbols\",\"symbols\"])")
 
 (provide 'isa)
-- 
cgit v1.2.3