How to Reverse Subsublist Elements in Mathematica?

[Sarah rob]

lis= {{{2, 1}, {3, 2}, {8, 2}}, {{9, 6}, {1, 0}, {0, 2}}}

I am trying to reverse the subsublist so {2,1} becomes {1,2}, {3,2} becomes {2,3}...

I have tried Map[Reverse, Flatten[lis, 1]] but this creates
{{1,2},{2,3},{2,8},{6,9},{0,1},{2,0}}
which erases my sublist

Is there a way I can reverse the subsublist and keep all the brakets intact?

 

[Simon_Tyler]

You can specify the depth at which you want Map to act. So try

Map[Reverse, lis, {2}]