DestroyFunc GoAndMoveLeft
AddToFunc GoAndMoveLeft
+ I ShowHidePager BigPager 3000
+ I Piperead '\
if [ $[page.nx] -gt $[FirstPageX] ]  ; then \
	echo MoveToPage -1p -0p ;\
	echo GoToPage -1p -0p; \
elif [ $[desk.n] -eq 0 ] ||  [ $[desk.n] -eq 3 ] || [ $[desk.n] -eq 6 ]   ; then \
	echo MoveToDesk 2 ; \
	echo GoToDesk 2 ; \
	echo MoveToPage 2 $[page.ny];\
	echo GoToPage  2  $[page.ny] ; \
else  	\
	echo MoveToDesk -1 ;\
	echo GoToDesk -1 ; \
	echo MoveToPage 2 $[page.ny] ; \
	echo GoToPage  2  $[page.ny] ; \
fi;\
'
+ I Focus