equal
deleted
inserted
replaced
273 + I SetEnv fvwm_page_ny $[page.ny] |
273 + I SetEnv fvwm_page_ny $[page.ny] |
274 + I Test (EnvMatch fvwm_page_ny 0) Nop |
274 + I Test (EnvMatch fvwm_page_ny 0) Nop |
275 + I TestRc (Match) GotoDesk -1 0 4 |
275 + I TestRc (Match) GotoDesk -1 0 4 |
276 + I TestRc (Match) GotoPage +0p 2 |
276 + I TestRc (Match) GotoPage +0p 2 |
277 + I TestRc (NoMatch) GotoPage +0p -1p |
277 + I TestRc (NoMatch) GotoPage +0p -1p |
278 # Remove fvwm_page_ny so derived processes do not inherit it. |
278 + I UnSetEnv fvwm_page_ny |
279 + I SetEnv fvwm_page_ny |
|
280 |
279 |
281 Key F11 A C myGotoPageUp |
280 Key F11 A C myGotoPageUp |
282 |
281 |
283 # Move across page down, if no page more go to first page of next desk. |
282 # Move across page down, if no page more go to first page of next desk. |
284 DestroyFunc myGotoPageDown |
283 DestroyFunc myGotoPageDown |
287 + I SetEnv fvwm_page_ny $[page.ny] |
286 + I SetEnv fvwm_page_ny $[page.ny] |
288 + I Test (EnvMatch fvwm_page_ny 2) Nop |
287 + I Test (EnvMatch fvwm_page_ny 2) Nop |
289 + I TestRc (Match) GotoDesk +1 0 4 |
288 + I TestRc (Match) GotoDesk +1 0 4 |
290 + I TestRc (Match) GotoPage +0p 0 |
289 + I TestRc (Match) GotoPage +0p 0 |
291 + I TestRc (NoMatch) GotoPage +0p +1p |
290 + I TestRc (NoMatch) GotoPage +0p +1p |
292 # Remove fvwm_page_ny so derived processes do not inherit it. |
291 + I UnSetEnv fvwm_page_ny |
293 + I SetEnv fvwm_page_ny |
|
294 |
292 |
295 Key F10 A C myGotoPageDown |
293 Key F10 A C myGotoPageDown |
296 |
294 |
297 Key F9 A S CursorMove -50p +0p |
295 Key F9 A S CursorMove -50p +0p |
298 Key F10 A S CursorMove +0p +50p |
296 Key F10 A S CursorMove +0p +50p |