;+
; NAME:
;	CDS_GEN_HELP
;
; PURPOSE:
;	This procedure goes through all the LASCO IDL directories and
;       generates a help file in HTML format of the form help_<directory>.html
;
; CATEGORY:
;	
;	Utility
;
; CALLING SEQUENCE:
;
;	CDS_GEN_HELP
;
; INPUTS:
;       NONE
;	
; KEYWORD PARAMETERS:
;       NONE
;
; OUTPUTS:
;       HTML Help Files in each directory are generated
;
; EXAMPLE:
;
;	CDS_GEN_HELP
;
; MODIFICATION HISTORY:
; 	Written by:	Dennis Wang
;       Created: 2 Feb 2001
;
;	%W% %H% LASCO IDL LIBRARY
;-

PRO CDS_GEN_HELP
path=getenv("NRL_LIB")
directory=['cal/gis','cal/vds', $
 'data_handling/telem/engineering','data_handling/telem/science', $
 'data_handling/telem','data_handling/i_o','data_handling/i_o/fits', $
 'data_handling/i_o/fits/cds','data_handling/soho/cds','external','info', $
 'plan/science','plan/tech','plan/image_tool','plan/database','plan/command', $
 'soho_util', $
 'util/time','util/numerical','util/sw_maint','util/fits','util/user','util/tape', $
 'util/database','util/array','util/misc','util/coord','util/device','/util/struct', $
 'util/string','util/widget','util/os','util/graphics','util/graphics','util/help']

ndir = n_elements(directory)

for i=0,ndir - 1 do begin
 cd,path+"/cds/"+directory(i)
 leaf = str_sep(directory(i),'/')
 nleaf = n_elements(leaf)
 base = leaf(nleaf - 1)
 lasco_mk_html_help,'./','help_'+base+'.html'
endfor

end