I, personally, think you are doing it right. These variations are also graded "incorrect":
Manipulate[Graphics[Style[Disk[],Hue[h]]],{{h,0.},0,1}] (* == expected output *)
Manipulate[Graphics[{Hue[h], Disk[]},{h,0,1}] (* my personal preference *)
Manipulate[Graphics[{Hue[h], Disk[]},{{h,0.},0,1}]
All achieved the stated task in Ex. 9.4, as I understood it.