Changeset 49 for trunk/ToBeReviewed/WIDGET/AUTOUR_de_XXX/read_vermair.pro

Timestamp:

05/09/06 11:47:44 (18 years ago)

Author:

pinsard

Message:

upgrade of AUTOUR_de_XXX according to cerbere.lodyc.jussieu.fr: /usr/home/smasson/SAXO_RD/ : files

File:

• trunk/ToBeReviewed/WIDGET/AUTOUR_de_XXX/read_vermair.pro (copied) (copied from trunk/WIDGET/AUTOUR_de_XXX/read_vermair.pro) (2 diffs)

trunk/ToBeReviewed/WIDGET/AUTOUR_de_XXX/read_vermair.pro

@@ -1 @@
-FUNCTION read_vermair, name,debut,fin, nomexp, PARENT = parent, BOITE=boite, _EXTRA = ex
+FUNCTION read_vermair, name,debut,fin, nomexp, PARENT = parent, BOXZOOM=boxzoom, _EXTRA = ex
 @common
 ;------------------------------------------------------------ 
@@ -5 +5 @@
    if name EQ 'vn' then name = 'vomecrty'
    if debut EQ fin then begin
-      res = lec(name,debut,nomexp, BOITE=boite, _EXTRA = ex)
-   ENDIF ELSE res = lec(name,debut,fin, nomexp, BOITE=boite, _EXTRA = ex)
+      res = lec(name,debut,nomexp, BOXZOOM=boxzoom, _EXTRA = ex)
+   ENDIF ELSE res = lect(name,debut,fin, nomexp, BOXZOOM=boxzoom, _EXTRA = ex)
 ;------------------------------------------------------------ 
    return, {tab:res, grille:vargrid, unite:'', experience:varexp, nom:varname}