OV-GSO-DC / dustem-wrapper_idl

Commit e6ef36746053cd64b732a6da95618f1a51d962a9

Authored by Ilyes Choubani
1 parent 19961cc2
Exists in master

removed st keyword in modify_dust_pol plugin, only key,val,scope,paramtag are allowed

Showing 2 changed files with 4 additions and 13 deletions   Show diff stats
Inline Side-by-side
src/idl/dustem_activate_plugins.pro
  Diff comments   View file @e6ef367
... ... @@ -109,13 +109,8 @@ FOR i=0L,n_elements(param_descs)-1 DO BEGIN
109 109 toto=execute(str)
110 110 ((*!dustem_plugin).(k).paramtag)=ptr_new(paramtag)
111 111  
112   - if strtrim(strupcase(strmid((*(*!dustem_plugin).(k).scope),0,7)),2) EQ 'REPLACE' then begin
113   - str='((*!dustem_plugin).('+strtrim(k,2)+').spec)=ptr_new('+ftn+'(st,key=index,val=value)'+')'
114   - str=str(0)
115   - endif else begin
116   - str='((*!dustem_plugin).('+strtrim(k,2)+').spec)=ptr_new('+ftn+'(key=index,val=value)'+')'
117   - str=str(0)
118   - endelse
  112 + str='((*!dustem_plugin).('+strtrim(k,2)+').spec)=ptr_new('+ftn+'(key=index,val=value)'+')' & str=str(0)
  113 +
119 114 toto=execute(str) & IF !dustem_verbose NE 0 THEN message,strupcase(strmid(ftn,7)),/info
120 115  
121 116 f=f+1 & i=i+count-1 ; Incrementing the parameter and same-type plugin indices
... ...
src/idl/dustem_plugin_modify_dust_pol.pro
  Diff comments   View file @e6ef367
1   -FUNCTION dustem_plugin_modify_dust_pol, st, key=key, val=val, scope=scope, paramtag=paramtag, help=help
  1 +FUNCTION dustem_plugin_modify_dust_pol, key=key, val=val, scope=scope, paramtag=paramtag, help=help
2 2  
3 3 ;+
4 4 ; NAME:
... ... @@ -37,12 +37,8 @@ IF keyword_set(help) THEN BEGIN
37 37 out=0.
38 38 GOTO,the_end
39 39 ENDIF
40   -
41   -IF not keyword_set(set) THEN BEGIN
42 40  
43   - st=*!dustem_current
44   -
45   -ENDIF
  41 +st=*!dustem_current
46 42  
47 43 IF keyword_set(scope) THEN BEGIN
48 44 out=0.
... ...