settheme() function added