On Thu, May 20, 2004 at 10:46:21PM +0200, Marc Schlienger wrote:
> Hi,
> 
> I want to create a function that moves a window to the next/previous page. 
> For 
> example, if the current Page is 0 1 I want the window to be moved to 
> Page 0 2.
> 
> Any ideas?


Try this (it requires FvwmPerl and assumes a 4x4 grid):

DestroyFunc MoveWindowToNextPage
AddToFunc MoveWindowToNextPage
+               I       WindowId ${w.id} MoveToPage \
                %{ ${page.nx} < 3 ? ${page.nx} + 1 : \
                        ${page.ny} < 3 ? 0 : 3 }% \
                %{ ${page.nx} < 3 ? ${page.ny} : \
                        ${page.ny} < 3 ? ${page.ny} + 1 : 3 }%

This should consider 3,3 as the "last page" and not try to move a window
on beyond it. By changing both occurrences of ': 3 }%' to ': 0 }%', you
could make the "next page" from 3,3 wrap around to 0,0.


-- 
 .*********  Fight Back!  It may not be just YOUR life at risk.  *********.
 : phil stracchino : unix ronin : renaissance man : mystic zen biker geek :
 :  [EMAIL PROTECTED]|[EMAIL PROTECTED]|[EMAIL PROTECTED]  :
 :   2000 CBR929RR, 1991 VFR750F3 (foully murdered), 1986 VF500F (sold)   :
 :    Linux Now!   ...Because friends don't let friends use Microsoft.    :
--
Visit the official FVWM web page at <URL: http://www.fvwm.org/>.
To unsubscribe from the list, send "unsubscribe fvwm" in the body of a
message to [EMAIL PROTECTED]
To report problems, send mail to [EMAIL PROTECTED]

Reply via email to