For the last change I made the "name" parameter optional ...
ad_proc -public get_id {
{-name}
} {
Return a theme's id
@name The name of the theme, defaults to the portal default theme name
@return The theme_id
} {
if { ![info exists name]} {
set name [parameter::get_from_package_key \
-package_key portal \
-parameter -DefaultThemeName]
}
return [db_string select_theme_id {}]
}
I'm committing these to HEAD...