From 46439007cf417cbd9ac8049bb4122c890097a0fa Mon Sep 17 00:00:00 2001
From: "Charles.Forsyth" <devnull@localhost>
Date: Fri, 22 Dec 2006 20:52:35 +0000
Subject: 20060303-partial

---
 module/titlebar.m | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 module/titlebar.m

(limited to 'module/titlebar.m')

diff --git a/module/titlebar.m b/module/titlebar.m
new file mode 100644
index 00000000..10dd0800
--- /dev/null
+++ b/module/titlebar.m
@@ -0,0 +1,18 @@
+Titlebar: module{
+	PATH: con "/dis/lib/titlebar.dis";
+
+	Resize,
+	Hide,
+	Help,
+	OK,
+	Popup,
+	Plain:		con 1 << iota;
+	Appl:		con Resize | Hide;
+
+	init:	fn();
+	new:		fn(top: ref Tk->Toplevel, buts: int): chan of string;
+	minsize:	fn(top: ref Tk->Toplevel): Draw->Point;
+	title:		fn(top: ref Tk->Toplevel): string;
+	settitle:	fn(top: ref Tk->Toplevel, title: string): string;
+	sendctl:	fn(top: ref Tk->Toplevel, c: string);
+};
-- 
cgit v1.2.3