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.