'See perl_lexer.py for details on what this routine does.'

def _fix_token_list(self, tok):

    ttype = tok['style']
    tval = tok['text']
    if self.is_udl_csl_family(ttype):
        if ((ttype == ScintillaConstants.SCE_UDL_CSL_OPERATOR) and (len(tval) > 1)):
            self.append_split_tokens(tok, self.js_multi_char_ops, adjust_line=False, dest_q=self.csl_tokens)
        else:
            self.complete_token_push(tok, adjust_line=False, dest_q=self.csl_tokens)
    elif self.is_udl_ssl_family(ttype):
        if ((tok['style'] == ScintillaConstants.SCE_UDL_SSL_OPERATOR) and (len(tok['text']) > 1)):
            self.append_split_tokens(tok, self.multi_char_ops)
        else:
            self.complete_token_push(tok)
        self._contains_ssl = True
