Changeset 238 for trunk/SRC/ForOldVersion/updatekwd.pro

Timestamp:

03/27/07 15:43:18 (17 years ago)

Author:

pinsard

Message:

improvements/corrections of some *.pro headers

File:

• trunk/SRC/ForOldVersion/updatekwd.pro (modified) (3 diffs)

trunk/SRC/ForOldVersion/updatekwd.pro

@@ -7 +7 @@
 ; @categories compatibility with previous version
 ;
-; @examples 
+; @examples
 ; IDL> \@updatekwd
-;   (must be insert as an include in a procedure or function) 
+;   (must be insert as an include in a procedure or function)
 ;
 ; @restrictions the compatibility can be made only if the keyword
 ;               given through _extra are given with their complete name
 ;
-; @history Sebastien Masson (smasson\@lodyc.jussieu.fr)
+; @history
+; Sebastien Masson (smasson\@lodyc.jussieu.fr)
 ;                      July 2005
-; @version $Id$
+; @version
+; $Id$
 ;
 ;-
@@ -41 +43 @@
   old = strtrim(strlowcase(old[1:*]), 2)
   new = strtrim(strlowcase(new[1:*]), 2)
-;  
+;
 ; what are the keywords of the present routine?
 ;
@@ -64 +66 @@
     FOR i = 0, n_elements(alltags)-1 DO BEGIN
       isold = (where(old EQ alltags[i], count))[0]
-      IF count EQ 1 THEN BEGIN 
+      IF count EQ 1 THEN BEGIN
         dummy = where(kwds EQ new[isold], count)
-        IF count EQ 1 THEN BEGIN 
+        IF count EQ 1 THEN BEGIN
           dummy = execute(new[isold] + ' = ex.' + alltags[i])
 ;           dummy = execute('ex = get_extra(' + new[isold] + ' = ex.' $