";
foreach (glob("$base*") as $theme) {
$name = substr($theme, $base_len);
$options[$name] = $name;
}
$session = Session::instance();
$highroller_theme = $session->get("highroller_theme");
print ' Theme: ' .
form::dropdown("", $options, $highroller_theme,
'style="display: inline" onchange="pick_theme(this.value)"') .
'
';
}
}