DIRECTORY 
Rope USING [ROPE],
Xl USING [Connection, Window], 
XlICCCMTypes USING [WMNormalHints, WMHints];

XlConventions: CEDAR DEFINITIONS
~ BEGIN 

ROPE: TYPE = Rope.ROPE;
Connection: TYPE = Xl.Connection;
Window: TYPE = Xl.Window;
SetWMNormalHints: PROC [c: Connection, window: Window, sizeHints: XlICCCMTypes.WMNormalHints, allways: BOOL ¬ FALSE];
SetWMHints: PROC [c: Connection, window: Window, hints: XlICCCMTypes.WMHints, allways: BOOL ¬ FALSE];

SetWindowName: PROC [c: Connection, window: Window, windowName: ROPE];

SetIconName: PROC [c: Connection, window: Window, iconName: ROPE];

SetWMTransient: PROC [c: Connection, window: Window, for: Window];

SetWMClass: PROC [c: Connection, window: Window, instance, class: ROPE ¬ NIL];

SetWMProtocols: PROC [c: Connection, window: Window, protocols: LIST OF ROPE ¬ NIL];

WMQueryPosition: PROC [c: Connection] RETURNS [BOOL];

WMMakesHeader: PROC [c: Connection] RETURNS [BOOL];

CutBufferGet: PROC [c: Connection] RETURNS [ROPE];

CutBufferPush: PROC [c: Connection, data: ROPE, hackForXTerm: BOOL ¬ FALSE];

CutBufferRotate: PROC [c: Connection, amount: INT ¬ -1];

END.

  ü  
XlConventions.mesa
Copyright Ó 1988, 1989, 1990, 1991 by Xerox Corporation.  All rights reserved.
Created by Christian Jacobi, May 2, 1988 4:40:43 pm PDT
Christian Jacobi, August 22, 1991 4:25 pm PDT

Window manager hints
ICCCM conventions in X.

Sets the WM NORMAL HINTS property. 
If allways is false and no sizeHints fields are set, this is a noop
p flag fields computed from non defaulted values

Sets the WM HINTS property. 
If allways is false and no hints fields are set, this is a noop
p flag fields computed from non defaulted values
Sets the window header
Sets the icon header; defaults to window header
Sets the WM TRANSIENT FOR atom
Sets the WM CLASS atom
Sets the WM PROTOCOLS atom
Window manager cheats
Try to outsmart silly window managers 
NOT ICCCM 
This will be removed when all interesting window manager can be handled without these tricks. 
Returns whether current window manager makes interactive requests on window creation
This is a hint only
Returns whether current window manager makes window headers
This is a hint only
Cut buffers
Follows outdated ICCCM Conventions.  Circular buffer of depht 8.  Store always rotates before downloading new value.   
IF hackForXTerm, violates ICCCM just enough so it works correctly with xterm (no rotate)
 Ê»  •NewlineDelimiter
–(cedarcode) style™ codešœ™Kšœ
ÏeœC™NKšœ7™7Kšœ-™-K™ —šÏk	œ˜
Kšœžœžœ˜Kšœžœ˜Kšœžœ˜,K˜ —KšÏnœžœž˜ šœžœ˜K˜ Kšžœžœžœ˜Kšœžœ˜!Kšœžœ˜—head™Kšœ™K™ šŸœžœQžœžœ˜uKšœÏzœ œ™#KšœC™CKšœ0™0K™ —šŸ
œžœGžœžœ˜eKšœ œ™Kšœ?™?Kšœ0™0—K˜ šŸœžœ-žœ˜FK™—K˜ šŸœžœ+žœ˜BK™/—K˜ šŸœžœ.˜BKšœ œ	 œ™K˜ —šŸ
œžœ2žœžœ˜NKšœ œ
™—K˜ šŸœžœ,žœžœžœžœ˜TKšœ œ™——™J™&J™
J™^K˜ šŸœžœžœžœ˜5KšœT™TJ™—K˜ šŸœžœžœžœ˜3Kšœ;™;J™——™Kšœw™wK˜ šŸœžœžœžœ˜2K˜ —š
Ÿœžœžœžœžœ˜LKšœX™XK˜ —KšŸœžœžœ˜8—K˜ Kšžœ˜K˜ — …—    l  #  