Ignore:
Timestamp:
03/19/07 18:15:51 (17 years ago)
Author:
pinsard
Message:

improvements/corrections of some *.pro headers

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/longclickaction.pro

    r154 r231  
    11;+ 
     2; 
    23; @file_comments 
    3 ; 
    44; 
    55; @categories 
    66; 
    7 ;  
    87; @param EVENT 
    98; 
    10 ;  
    119; @returns 
    12 ;  
    13 ;  
     10; 
    1411; @uses 
    15 ;  
    16 ;  
     12; 
    1713; @restrictions 
    18 ;  
    19 ;  
     14; 
    2015; @examples 
    21 ;  
    22 ;  
     16; 
    2317; @history 
    24 ;  
    25 ;  
     18; 
    2619; @version 
    27 ; $Id$  
    28 ;  
     20; $Id$ 
     21; 
    2922; @todo 
    3023; seb 
    3124; 
    3225;- 
     26; 
    3327PRO longclickaction, event 
    3428; 
     
    6660  y = [coor[1, 0], coor[1, 1]] 
    6761  domainid = widget_info(event.top, find_by_uname = 'domain') 
    68   IF type EQ 'pltv' THEN BEGIN  
     62  IF type EQ 'pltv' THEN BEGIN 
    6963    currentfile = extractatt(top_uvalue, 'currentfile') 
    7064    listgrid = (*(extractatt(top_uvalue, 'fileparameters'))[currentfile]).listgrid 
     
    7973; Do we have to pass the boxzoom in indexes ??? 
    8074  currentplot = (extractatt(top_uvalue, 'smallin'))[2]-1 
    81   options = extractatt(top_uvalue, 'options')    
     75  options = extractatt(top_uvalue, 'options') 
    8276  flags = extractatt(top_uvalue, 'optionsflag') 
    8377  flags = flags[*, currentplot] 
     
    107101      letsdraw, event.top 
    108102    END 
    109     2:BEGIN  
    110       IF type EQ 'plt' THEN BEGIN  
     103    2:BEGIN 
     104      IF type EQ 'plt' THEN BEGIN 
    111105        (*top_uvalue[1, findline(top_uvalue, 'types')])[smallout[2]-1] = 'pltz' 
    112106        forcetype = 'pltz' 
    113       ENDIF  
     107      ENDIF 
    114108      updatewidget, event.top, /noboxzoom 
    115109      letsdraw, event.top, forcetype = forcetype 
    116110    END 
    117111    4:BEGIN 
    118       IF type EQ 'plt' THEN BEGIN  
     112      IF type EQ 'plt' THEN BEGIN 
    119113        (*top_uvalue[1, findline(top_uvalue, 'types')])[smallout[2]-1] = 'pltt' 
    120114        forcetype = 'pltt' 
    121       ENDIF  
     115      ENDIF 
    122116      updatewidget, event.top, /noboxzoom, /nodates 
    123117      letsdraw, event.top, forcetype = forcetype 
Note: See TracChangeset for help on using the changeset viewer.