From 761d9aac830e435e59dcb97ae31a43fdcb5ac10f Mon Sep 17 00:00:00 2001
From: Makarius Wenzel
Date: Sat, 8 Jul 2000 14:28:21 +0000
Subject: do not change isabelle-prog-name here; be less aggressive in changing
 x-symbol-enable;

---
 isa/interface-setup.el | 18 ++++++++----------
 1 file changed, 8 insertions(+), 10 deletions(-)

diff --git a/isa/interface-setup.el b/isa/interface-setup.el
index 7f170480..d6646fd4 100644
--- a/isa/interface-setup.el
+++ b/isa/interface-setup.el
@@ -1,13 +1,11 @@
 ;;
 ;; $Id$
-;; 
-
-(customize-set-variable
- 'isabelle-prog-name
- (concat (getenv "ISABELLE") " " (getenv "PROOFGENERAL_LOGIC")))
+;;
 
-(customize-set-variable
- (if (equal (getenv "PROOFGENERAL_ASSISTANTS") "isa")
-     'isa-x-symbol-enable
-   'isar-x-symbol-enable)
- (equal (getenv "PROOFGENERAL_XSYMBOL") "true"))
+(let ((xsymbol (getenv "PROOFGENERAL_XSYMBOL")))
+  (if (and xsymbol (not (equal xsymbol "")))
+      (customize-set-variable
+       (if (equal (getenv "PROOFGENERAL_ASSISTANTS") "isa")
+           'isa-x-symbol-enable
+         'isar-x-symbol-enable)
+       (equal xsymbol "true"))))
-- 
cgit v1.2.3