Konungen var klädd igeneralBuniform