Changeset 7 for trunk/UTILITAIRE

Timestamp:

04/24/06 10:40:41 (18 years ago)

Author:

pinsard

Message:

1st commit according to cerbere.lodyc.jussieu.fr:/usr/home/smasson/IDL_RD/

File:

• trunk/UTILITAIRE/routine_name.pro (modified) (2 diffs)

trunk/UTILITAIRE/routine_name.pro

@@ -53 +53 @@
 ;
    version=strmid(!version.release,0,3)
-   if version EQ '5.2' OR version EQ '5.3' OR version EQ '5.4' then begin
+   if version EQ '5.2' OR version EQ '5.3' OR version EQ '5.4' OR version EQ '5.5' OR version EQ '5.6' then begin
       help,  /traceback, output = name
       name = strtrim(name, 1)   ; on enleve les blancs en debut de ligne
@@ -75 +75 @@
       if n_elements(name) LT 3  then name = name[0] ELSE name = 'L.'+name[1]+' '+name[2]
    ENDIF ELSE BEGIN
-      print, ('attention la fonction routine_name a ete ecrite pour les versions: !C IDL 5.2, IDL 5.2.1, 5.3 ou 5.4. ou 5.4.1 Verifier qu''elle marche bien avec la version '+!version.release)
+      print, 'attention la fonction routine_name a ete ecrite pour les versions: IDL 5.2, IDL 5.2.1, 5.3 ou 5.4. ou 5.4.1 ou 5.5  ou 5.6 Verifier qu''elle marche bien avec la version '+!version.release
       return, 'Error'
    ENDELSE