.fvwm/config
changeset 807 29df20967967
parent 806 cb2143998c5f
child 808 49e1cf4f48d5
equal deleted inserted replaced
806:cb2143998c5f 807:29df20967967
   382 
   382 
   383 DestroyFunc myGotoPage
   383 DestroyFunc myGotoPage
   384 AddToFunc myGotoPage
   384 AddToFunc myGotoPage
   385 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False"
   385 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False"
   386 + I GotoPage $0 $1
   386 + I GotoPage $0 $1
       
   387 + I Next (CurrentPage) Focus
   387 
   388 
   388 Key F9 A C myGotoPage -1p -0p
   389 Key F9 A C myGotoPage -1p -0p
   389 Key F12 A C myGotoPage +1p +0p
   390 Key F12 A C myGotoPage +1p +0p
   390 
   391 
   391 # Move across page up, if no page more go to last page of prev desk.
   392 # Move across page up, if no page more go to last page of prev desk.
   396 + I Test (EnvMatch fvwm_page_ny 0) Nop
   397 + I Test (EnvMatch fvwm_page_ny 0) Nop
   397 + I TestRc (Match) GotoDesk -1 0 4
   398 + I TestRc (Match) GotoDesk -1 0 4
   398 + I TestRc (Match) GotoPage +0p 2
   399 + I TestRc (Match) GotoPage +0p 2
   399 + I TestRc (NoMatch) GotoPage +0p -1p
   400 + I TestRc (NoMatch) GotoPage +0p -1p
   400 + I UnSetEnv fvwm_page_ny
   401 + I UnSetEnv fvwm_page_ny
       
   402 + I Next (CurrentPage) Focus
   401 
   403 
   402 Key F11 A C myGotoPageUp
   404 Key F11 A C myGotoPageUp
   403 
   405 
   404 # Move across page down, if no page more go to first page of next desk.
   406 # Move across page down, if no page more go to first page of next desk.
   405 DestroyFunc myGotoPageDown
   407 DestroyFunc myGotoPageDown
   409 + I Test (EnvMatch fvwm_page_ny 2) Nop
   411 + I Test (EnvMatch fvwm_page_ny 2) Nop
   410 + I TestRc (Match) GotoDesk +1 0 4
   412 + I TestRc (Match) GotoDesk +1 0 4
   411 + I TestRc (Match) GotoPage +0p 0
   413 + I TestRc (Match) GotoPage +0p 0
   412 + I TestRc (NoMatch) GotoPage +0p +1p
   414 + I TestRc (NoMatch) GotoPage +0p +1p
   413 + I UnSetEnv fvwm_page_ny
   415 + I UnSetEnv fvwm_page_ny
       
   416 + I Next (CurrentPage) Focus
   414 
   417 
   415 Key F10 A C myGotoPageDown
   418 Key F10 A C myGotoPageDown
   416 
   419 
   417 # Move window across pages left.
   420 # Move window across pages left.
   418 DestroyFunc myMovePageLeft
   421 DestroyFunc myMovePageLeft