equal
deleted
inserted
replaced
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 + I Next (CurrentPage) Focus |
388 |
388 |
389 Key F9 A C myGotoPage -1p -0p |
389 Key F9 A 3C myGotoPage -1p -0p |
390 Key F12 A C myGotoPage +1p +0p |
390 Key F12 A 3C myGotoPage +1p +0p |
391 |
391 |
392 # Move across pages up, if there are no more page go to last page of prev desk. |
392 # Move across pages up, if there are no more page go to last page of prev desk. |
393 DestroyFunc myGotoPageUp |
393 DestroyFunc myGotoPageUp |
394 AddToFunc myGotoPageUp |
394 AddToFunc myGotoPageUp |
395 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
395 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
399 + I TestRc (Match) GotoPage +0p 2 |
399 + I TestRc (Match) GotoPage +0p 2 |
400 + I TestRc (NoMatch) GotoPage +0p -1p |
400 + I TestRc (NoMatch) GotoPage +0p -1p |
401 + I UnSetEnv fvwm_page_ny |
401 + I UnSetEnv fvwm_page_ny |
402 + I Next (CurrentPage) Focus |
402 + I Next (CurrentPage) Focus |
403 |
403 |
404 Key F11 A C myGotoPageUp |
404 Key F11 A 3C myGotoPageUp |
405 |
405 |
406 # Move across pages down, if there are no more pages go to first page of next desk. |
406 # Move across pages down, if there are no more pages go to first page of next desk. |
407 DestroyFunc myGotoPageDown |
407 DestroyFunc myGotoPageDown |
408 AddToFunc myGotoPageDown |
408 AddToFunc myGotoPageDown |
409 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
409 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
413 + I TestRc (Match) GotoPage +0p 0 |
413 + I TestRc (Match) GotoPage +0p 0 |
414 + I TestRc (NoMatch) GotoPage +0p +1p |
414 + I TestRc (NoMatch) GotoPage +0p +1p |
415 + I UnSetEnv fvwm_page_ny |
415 + I UnSetEnv fvwm_page_ny |
416 + I Next (CurrentPage) Focus |
416 + I Next (CurrentPage) Focus |
417 |
417 |
418 Key F10 A C myGotoPageDown |
418 Key F10 A 3C myGotoPageDown |
419 |
419 |
420 # Move window across pages left. |
420 # Move window across pages left. |
421 DestroyFunc myMovePageLeft |
421 DestroyFunc myMovePageLeft |
422 AddToFunc myMovePageLeft |
422 AddToFunc myMovePageLeft |
423 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
423 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
425 + I SetEnv fvwm_curr_w $[w.id] |
425 + I SetEnv fvwm_curr_w $[w.id] |
426 + I WindowId $[fvwm_curr_w] MoveToPage wrapx -1p +0p |
426 + I WindowId $[fvwm_curr_w] MoveToPage wrapx -1p +0p |
427 + I WindowId $[fvwm_curr_w] Focus |
427 + I WindowId $[fvwm_curr_w] Focus |
428 + I UnSetEnv fvwm_curr_w |
428 + I UnSetEnv fvwm_curr_w |
429 |
429 |
430 Key F9 A M myMovePageLeft |
430 Key F9 A 3M myMovePageLeft |
431 |
431 |
432 # Move window across pages right. |
432 # Move window across pages right. |
433 DestroyFunc myMovePageRight |
433 DestroyFunc myMovePageRight |
434 AddToFunc myMovePageRight |
434 AddToFunc myMovePageRight |
435 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
435 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
437 + I SetEnv fvwm_curr_w $[w.id] |
437 + I SetEnv fvwm_curr_w $[w.id] |
438 + I WindowId $[fvwm_curr_w] MoveToPage wrapx +1p +0p |
438 + I WindowId $[fvwm_curr_w] MoveToPage wrapx +1p +0p |
439 + I WindowId $[fvwm_curr_w] Focus |
439 + I WindowId $[fvwm_curr_w] Focus |
440 + I UnSetEnv fvwm_curr_w |
440 + I UnSetEnv fvwm_curr_w |
441 |
441 |
442 Key F12 A M myMovePageRight |
442 Key F12 A 3M myMovePageRight |
443 |
443 |
444 # Move window across pages down, if there is no more pages go to first page of next desk. |
444 # Move window across pages down, if there is no more pages go to first page of next desk. |
445 DestroyFunc myMovePageDown |
445 DestroyFunc myMovePageDown |
446 AddToFunc myMovePageDown |
446 AddToFunc myMovePageDown |
447 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
447 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
453 + I Test (!EnvMatch fvwm_page_ny 2) WindowId $[fvwm_curr_w] MoveToPage +0p +1p |
453 + I Test (!EnvMatch fvwm_page_ny 2) WindowId $[fvwm_curr_w] MoveToPage +0p +1p |
454 + I WindowId $[fvwm_curr_w] Focus |
454 + I WindowId $[fvwm_curr_w] Focus |
455 + I UnSetEnv fvwm_page_ny |
455 + I UnSetEnv fvwm_page_ny |
456 + I UnSetEnv fvwm_curr_w |
456 + I UnSetEnv fvwm_curr_w |
457 |
457 |
458 Key F10 A M myMovePageDown |
458 Key F10 A 3M myMovePageDown |
459 |
459 |
460 # Move window across pages up, if there is no more pages go to last page of the previous desk. |
460 # Move window across pages up, if there is no more pages go to last page of the previous desk. |
461 DestroyFunc myMovePageUp |
461 DestroyFunc myMovePageUp |
462 AddToFunc myMovePageUp |
462 AddToFunc myMovePageUp |
463 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
463 + I Next (CirculateHit, FvwmPager, Shaded) WindowShade "False" |
469 + I Test (!EnvMatch fvwm_page_ny 0) WindowId $[fvwm_curr_w] MoveToPage +0p -1p |
469 + I Test (!EnvMatch fvwm_page_ny 0) WindowId $[fvwm_curr_w] MoveToPage +0p -1p |
470 + I WindowId $[fvwm_curr_w] Focus |
470 + I WindowId $[fvwm_curr_w] Focus |
471 + I UnSetEnv fvwm_page_ny |
471 + I UnSetEnv fvwm_page_ny |
472 + I UnSetEnv fvwm_curr_w |
472 + I UnSetEnv fvwm_curr_w |
473 |
473 |
474 Key F11 A M myMovePageUp |
474 Key F11 A 3M myMovePageUp |
475 |
475 |
476 |
476 |
477 Key F9 A S CursorMove -50p +0p |
477 Key F9 A S CursorMove -50p +0p |
478 Key F10 A S CursorMove +0p +50p |
478 Key F10 A S CursorMove +0p +50p |
479 Key F11 A S CursorMove +0p -50p |
479 Key F11 A S CursorMove +0p -50p |