From b879b33815f01b8365caf0006b6788f4ceb827b1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Niels=20M=C3=B6ller?= <nisse@lysator.liu.se>
Date: Sat, 10 Jan 1998 01:40:01 +0100
Subject: [PATCH] * _Xlib.pmod (pad): New function.
Rev: lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod:1.6
---
lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod b/lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod
index 43a201a5ae..0b39a561c0 100644
--- a/lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod
+++ b/lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod
@@ -5,6 +5,11 @@
object display_re = Regexp("([^:]*):([0-9]+).([0-9]+)");
+string pad(string s)
+{
+ return s + ({ "", "\0\0\0", "\0\0", "\0" })[strlen(s) % 4];
+}
+
array(string) window_attributes =
({ "BackPixmap",
"BackPixel",
--
GitLab