'NOTE we apply the tabular machinary to the phenodata extracted
from a BioC eSet or affybatch.'

def set_meta(self, dataset, **kwd):

    Html.set_meta(self, dataset, **kwd)
    try:
        flist = os.listdir(dataset.extra_files_path)
    except:
        if verbose:
            gal_Log.debug('@@@rexpression    set_meta    failed    -    no    dataset?')
        return False
    bn = dataset.metadata.base_name
    if (not bn):
        for f in flist:
            n = os.path.splitext(f)[0]
            bn = n
            dataset.metadata.base_name = bn
    if (not bn):
        bn = '?'
        dataset.metadata.base_name = bn
    pn = ('%s.pheno' % bn)
    pp = os.path.join(dataset.extra_files_path, pn)
    dataset.metadata.pheno_path = pp
    try:
        pf = open(pp, 'r').readlines()
    except:
        pf = None
    if pf:
        h = pf[0].strip()
        h = h.split(' DCTB ')
        h = [escape(x) for x in h]
        dataset.metadata.column_names = h
        dataset.metadata.columns = len(h)
        dataset.peek = ''.join(pf[:5])
    else:
        dataset.metadata.column_names = []
        dataset.metadata.columns = 0
        dataset.peek = 'No    pheno    file    found'
    if (pf and (len(pf) > 1)):
        dataset.metadata.pheCols = self.get_phecols(phenolist=pf)
    else:
        dataset.metadata.pheCols = [('', 'No    useable    phenotypes    found', False)]
    if (not dataset.info):
        dataset.info = 'Galaxy    Expression    datatype    object'
    if (not dataset.blurb):
        dataset.blurb = 'R    loadable    BioC    expression    object    for    the    Rexpression    Galaxy    toolkit'
    return True
