diff --git a/lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod b/lib/modules/Protocols.pmod/X.pmod/_Xlib.pmod
index 43a201a5ae27fc41e0330e657ba07699a1723296..0b39a561c02d278af340cd49601039b60a1b96f0 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",