Commit 8b12fe66defd93f77f67718d80b3dc264a7b79a1

Authored by Ilyes Choubani
1 parent 2e2611d1
Exists in master

restoring activate_plugins

Showing 1 changed file with 5 additions and 4 deletions   Show diff stats
src/idl/dustem_activate_plugins.pro
... ... @@ -61,7 +61,7 @@ FOR i=0L,n_elements(p_min)-1 DO BEGIN
61 61  
62 62  
63 63 vari = strmid(PDO_tmp(0),ii+1) ; Test variable to be used to alter the initialization of the index and value arrays below as a keyword can be a scalar or a string
64   -
  64 +
65 65 ; Initialization of the index and value arrays. These arrays will be used (below) when calling the plugins (with the default key=key and val=val keywords)
66 66  
67 67 if strlen(strtrim(string(vari),2)) gt 1 then begin
... ... @@ -85,12 +85,13 @@ FOR i=0L,n_elements(p_min)-1 DO BEGIN
85 85  
86 86 k=where(strmid(tag_names(*!dustem_scope),0,4) eq strmid(strupcase(strmid(ftn,14)),0,4),counte) ; Selecting a plugin through matching the string name of the plugin form the scope system variable with the one read from the parameter description vector
87 87  
88   -
  88 +
89 89 ;Dry run of the plugins to obtain their scopes and run them accordingly (an advanced user might want to add their own lines here)
  90 + str='toto='+ftn+'(scope=scope)'
  91 + toto=execute(str)
90 92  
91 93 (*!dustem_scope).(k)=ptr_new(scope)
92   - ;str='((*!dustem_scope).('+strtrim(k,2)+'))=ptr_new('+ftn+'(/scope)'+')'[0]
93   -
  94 +
94 95 IF !dustem_verbose NE 0 THEN message,strupcase(strmid(ftn,7)),/info
95 96  
96 97  
... ...