;+
; NAME:
;	RESTORE_SEQUENCE
;
;
; PURPOSE:
; 	Obsolete name of SMEI_RESTORE.
;
;
; MODIFICATION HISTORY:
; 	Make a wrapper for SMEI_RESTORE: 9/8/04; SJT
;-

pro restore_sequence, seqref, file, menu = menu, help = help

smei_msg, /warn, ['RESTORE_SEQUENCE has been renamed as', $
                  'SMEI_RESTORE. Calling SMEI_RESTORE now']


if n_params() le 1 then smei_restore, seqref, menu = menu, help = help $
else smei_restore, seqref, file, menu = menu, help = help

end