;+
; NAME:
;	SMEI_SEQUENCE::APPLY_COLOUR_MAP
;
;
; PURPOSE:
;	Apply the selected colour table to the current device.
;
;
; CATEGORY:
;	SMEI_SEQUENCE
;
;
; CALLING SEQUENCE:
;	seqref -> apply colour_map
;
;
; MODIFICATION HISTORY:
;	Original: 12/12/02; SJT
;-

pro smei_sequence::apply_colour_map

if max(self.colour_table) eq 0 then self -> set_colour_map

tvlct, self.colour_table

if !d.name ne 'PS' then begin
    junk = colormap_applicable(redraw)
    if redraw then self -> mk_pixmap, /clear
endif

end