--- a/.fvwm/config	Sat Apr 15 01:14:21 2017 +0300
+++ b/.fvwm/config	Sat Apr 15 01:19:26 2017 +0300
@@ -380,14 +380,14 @@
 # F9  - left              F12 - right
 #             F10 - down
 
-DestroyFunc myGotoPage
-AddToFunc myGotoPage
+DestroyFunc myGotoPageHoriz
+AddToFunc myGotoPageHoriz
 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False"
-+ I GotoPage $0 $1
++ I GotoPage wrapx $0 +0p
 + I Next (CurrentPage) Focus
 
-Key F9 A  3C myGotoPage -1p -0p
-Key F12 A 3C myGotoPage +1p +0p
+Key F9  A 3C myGotoPageHoriz -1p
+Key F12 A 3C myGotoPageHoriz +1p
 
 # Move across pages up, if there are no more page go to last page of prev desk.
 DestroyFunc myGotoPageUp