From 17f68ba0fa4b302ed59016a6664d26146268fc01 Mon Sep 17 00:00:00 2001
From: Marcus Comstedt <marcus@mc.pp.se>
Date: Sun, 8 Feb 1998 20:32:57 +0100
Subject: [PATCH] Raise and Lower functions added.

Rev: lib/modules/Protocols.pmod/X.pmod/Types.pmod:1.20
---
 lib/modules/Protocols.pmod/X.pmod/Types.pmod | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/lib/modules/Protocols.pmod/X.pmod/Types.pmod b/lib/modules/Protocols.pmod/X.pmod/Types.pmod
index e0fc9cd217..19a39b6eb8 100644
--- a/lib/modules/Protocols.pmod/X.pmod/Types.pmod
+++ b/lib/modules/Protocols.pmod/X.pmod/Types.pmod
@@ -594,6 +594,16 @@ class Window
     display->send_request(Configure_req(m));
   }
 
+  void Raise()
+  {
+    Configure((["StackMode":0]));
+  }
+
+  void Lower()
+  {
+    Configure((["StackMode":1]));
+  }
+
   void set_event_callback(string type, function f)
   {
     event_callbacks[type] = (event_callbacks[type] || ({ }) )
-- 
GitLab