Changeset 281 for trunk

Timestamp:

09/12/07 17:41:49 (17 years ago)

Author:

smasson

Message:

minor modifications

File:

• trunk/SRC/ForOldVersion/keep_compatibility.pro (modified) (1 diff)

trunk/SRC/ForOldVersion/keep_compatibility.pro

@@ -51 +51 @@
   ENDIF
 ; are we using the virtual machine??
-  IF n_elements(key_vm) EQ 0 THEN $
-     key_vm = total(file_test(expand_path(!path, /array)+'/keep_compatibility.pro')) EQ 0
+  IF n_elements(key_vm) EQ 0 THEN key_vm = lmgr(/vm)
+; are we using gdl or idl??
+  defsysv, '!gdl', exist = key_gdl
 ;
   IF n_elements(myuniquetmpdir) NE 0 THEN BEGIN