[README] updated edge-actions setup guide



Hi all,

based on todays changes in edge-actions, here are the updated setup 
instructions:

;; fancy customized edge-actions
( defvar-setq edge-actions-delay 250 )

( defvar-setq top-left-corner-program
  ( lambda () ( jump-or-exec "Iceweasel" "iceweasel" #:match-class t ) ) )

( defvar-setq top-right-corner-program
  ( lambda () ( pager-unhide ) ) )

( defvar-setq  bottom-right-corner-program 
  ( lambda () ( system "amarok &" ) ) )

( defvar-setq bottom-left-corner-program
  ( lambda () ( jump-or-exec "VirtualBox" "VirtualBox" #:match-class t ) ) )

( defvar-setq top-edge-program
  ( lambda () ( jump-or-exec "Konsole" "konsole" #:match-class t ) ) )

( defvar-setq bottom-edge-program
  ( lambda () ( raise-window ( get-window-by-role "panel_" #:regex t ) ) ) )

;; actions when pointer hits edge
( defvar-setq left-right-edge-func 'flip-viewport )
( defvar-setq top-bottom-edge-func 'hot-spot )

;; actions while moving window hits edge
( defvar-setq left-right-edge-move-func 'flip-workspace )
( defvar-setq top-bottom-edge-move-func 'none )

Regards,
Chris

Attachment: signature.asc
Description: This is a digitally signed message part.



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]