3 files changed, 80 insertions, 20 deletions

diff --git a/cmd/il.ha b/cmd/il.ha
index 2101a65..e0b5f3a 100644
--- a/cmd/il.ha
+++ b/cmd/il.ha
@@ -1,4 +1,5 @@
 use tui;
+use tui::widget;
 use tui::widget::list;
 use tui::layout;
 use bufio;
@@ -6,8 +7,55 @@ use os;
 use strings;
 use fmt;
 use io;
+use getopt;
+
+fn strtocolor(s: str, df: widget::color) widget::color = {
+	return switch (s) {
+	case "red" =>
+		yield widget::color::REDFG;
+	case "blue" =>
+		yield widget::color::BLUEFG;
+	case "green" =>
+		yield widget::color::GREENFG;
+	case "brown" =>
+		yield widget::color::BROWNFG;
+	case "cyan" =>
+		yield widget::color::CYANFG;
+	case "black" =>
+		yield widget::color::BLACKFG;
+	case "white" =>
+		yield widget::color::WHITEFG;
+	case "magenta" =>
+		yield widget::color::MAGENTAFG;
+	case =>
+		yield widget::color::DEFAULTFG;
+	};
+};
 
 export fn main() void = {
+	const cmd = getopt::parse(os::args,
+		"interactive list",
+		('n', "colour", "normal colour"),
+		('m', "colour", "marked colour"),
+		('b', "draw border"),
+	);
+	defer getopt::finish(&cmd);
+
+	let normalst = list::DEFAULTSTYLE.normal;
+	let markedst = list::DEFAULTSTYLE.marked;
+	let border = false;
+	for (let opt .. cmd.opts) {
+		switch (opt.0) {
+		case 'n' =>
+			normalst = strtocolor(opt.1, normalst);
+		case 'm' =>
+			markedst = strtocolor(opt.1, markedst) + 10;
+		case 'b' =>
+			border = true;
+		case => abort();
+		};
+	};
+
 	const scanner = bufio::newscanner(os::stdin);
 	defer bufio::finish(&scanner);
 
@@ -32,11 +80,24 @@ export fn main() void = {
 
 	const state = tui::init()!;
 	defer tui::finish(&state);
+	//let li = list::newscrolllist(
+	//	&state,
+	//	(1, 1),
+	//	void,
+	//	&list::DEFAULTSTYLE,
+	//	items...
+	//)!;
 	let li = list::newscrolllist(
 		&state,
 		(1, 1),
 		void,
-		void,
+		&list::liststyle {
+			style = &widget::style {
+				border = border,
+			},
+			normal = normalst,
+			marked = markedst,
+		},
 		items...
 	)!;
 	let vl = layout::newvlayout(&li);
diff --git a/cmd/list_strictsz.ha b/cmd/list_strictsz.ha
index e0a371d..6802387 100644
--- a/cmd/list_strictsz.ha
+++ b/cmd/list_strictsz.ha
@@ -10,14 +10,17 @@ use time;
 export fn main() void = {
 	const state = tui::init()!;
 	defer tui::finish(&state);
-	let li = list::newlist(&state, (1, 1), tty::ttysize {
+	let li = list::newscrolllist(&state, (1, 1), tty::ttysize {
 		rows = 3,
 		columns = 4,
-	}, &widget::style {
-		border = true,
-		colorfg = widget::color::BLUEFG,
-		colorbg = widget::color::BLUEBG,
-	}, "hello", "world", "bye", "world")!;
+	}, &list::liststyle {
+		style = &widget::style {
+			border = true,
+		},
+		normal = widget::color::DEFAULTFG,
+		marked = widget::color::DEFAULTBG,
+	},
+	"hel🎉", "world", "bye", "world")!;
 	let l = layout::newvlayout(&li);
 	l.layout.print(&l);
 };
diff --git a/cmd/text.ha b/cmd/text.ha
index 7c569a8..f8696ee 100644
--- a/cmd/text.ha
+++ b/cmd/text.ha
@@ -9,55 +9,51 @@ use time;
 export fn main() void = {
 	const state = tui::init()!;
 	defer tui::finish(&state);
-	let txt = text::newtext(&state, "hello world", (50, 20), &widget::style {
-		border = true,
-		colorfg = widget::color::REDFG,
-		colorbg = widget::color::REDBG,
-	});
+	let txt = text::newtext(&state, "hello world", (50, 20), &text::DEFAULTSTYLE);
 	let l = layout::newvlayout(&txt);
 	l.layout.print(&l);
 
 	//tui::clear(&state);
 
 	time::sleep(1 * time::SECOND);
-	let st = txt.widget.style as *widget::style;
-	st.colorfg = widget::color::GREENFG;
+	let st = txt.style;
+	st.normal = widget::color::GREENFG;
 	text::settext(&txt, "bye world");
 	l.layout.print(&l);
 
 	//tui::clear(&state);
 
 	time::sleep(1 * time::SECOND);
-	st.colorfg = widget::color::BROWNFG;
+	st.normal = widget::color::BROWNFG;
 	l.layout.print(&l);
 
 	//tui::clear(&state);
 
 	time::sleep(1 * time::SECOND);
-	st.colorfg = widget::color::BLUEFG;
+	st.normal = widget::color::BLUEFG;
 	l.layout.print(&l);
 
 	//tui::clear(&state);
 
 	time::sleep(1 * time::SECOND);
-	st.colorfg = widget::color::MAGENTAFG;
+	st.normal = widget::color::MAGENTAFG;
 	l.layout.print(&l);
 
 	//tui::clear(&state);
 
 	time::sleep(1 * time::SECOND);
-	st.colorfg = widget::color::CYANFG;
+	st.normal = widget::color::CYANFG;
 	l.layout.print(&l);
 
 	//tui::clear(&state);
 
 	time::sleep(1 * time::SECOND);
-	st.colorfg = widget::color::WHITEFG;
+	st.normal = widget::color::WHITEFG;
 	l.layout.print(&l);
 
 	//tui::clear(&state);
 
 	time::sleep(1 * time::SECOND);
-	st.colorfg = widget::color::DEFAULTFG;
+	st.normal = widget::color::DEFAULTFG;
 	l.layout.print(&l);
 };