1; obsolete and does nothing
2function gethelp,___ttt___,fullstring=fullstring,functions=functions,oneline=oneline,procedures=procedures,sys_procs=sys_procs,sys_funcs=sys_funcs
3  if (n_elements(___ttt___) gt 0) then begin
4     help,___ttt___,lev=-1,out=h,functions=functions,procedures=procedures
5     name=scope_varname(___ttt___,lev=-1)
6     l=strlen(h)
7     return,name+strmid(h,9,l)
8     stop
9  endif else begin
10     help,lev=-1,out=h,functions=functions,procedures=procedures
11  endelse
12
13  if keyword_set(oneline) then message,/informational,"oneline kw of gethelp ignored"
14  return,h
15end
16