[sawfish/edge-actions] load sawfish.wm.edge.actions into sawfish.wm



commit 84b33a3324e14673b545d584a32ec2ff52b3aba8
Author: Christopher Roy Bratusek <zanghar freenet de>
Date:   Sat Nov 20 10:08:02 2010 +0100

    load sawfish.wm.edge.actions into sawfish.wm

 lisp/sawfish/wm.jl |    9 ++++++---
 1 files changed, 6 insertions(+), 3 deletions(-)
---
diff --git a/lisp/sawfish/wm.jl b/lisp/sawfish/wm.jl
index cae7173..8e7f0ae 100644
--- a/lisp/sawfish/wm.jl
+++ b/lisp/sawfish/wm.jl
@@ -87,7 +87,8 @@
 			 sawfish.wm.state.iconify
 			 sawfish.wm.state.ignored
 			 sawfish.wm.server
-			 sawfish.wm.state.wm-spec))
+			 sawfish.wm.state.wm-spec
+			 sawfish.wm.edge.actions))
 
 ;; create the exports from sawfish.wm
 (open-structures '(sawfish.wm.colors
@@ -112,7 +113,8 @@
 		   sawfish.wm.state.iconify
 		   sawfish.wm.state.shading
 		   sawfish.wm.state.transient
-		   sawfish.wm.state.ignored))
+		   sawfish.wm.state.ignored
+		   sawfish.wm.edge.actions))
 
 ;; Bindings in these modules are exported by sawfish.wm on behalf of
 ;; them. User scripts have to import only sawfish.wm for core functions.
@@ -140,7 +142,8 @@
 		    (structure-interface sawfish.wm.state.iconify)
 		    (structure-interface sawfish.wm.state.shading)
 		    (structure-interface sawfish.wm.state.transient)
-		    (structure-interface sawfish.wm.state.ignored))))
+		    (structure-interface sawfish.wm.state.ignored)
+		    (structure-interface sawfish.wm.edge.actions))))
 
 (let ((sawfish-load-all (lambda (s)
 			  ;; ensure files are loaded in the correct structure



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