From 34706906f5a3aa667e2dca1e4779ba587ca8e7e4 Mon Sep 17 00:00:00 2001
From: Bill Currie <bill@taniwha.org>
Date: Tue, 31 Mar 2020 10:54:15 +0900
Subject: [PATCH] [qwaq] Allow views to be moved/resized without redraw

The move is to a specified point and resize to a specified size rather
than a delta.
---
 ruamoko/qwaq/ui/view.h |  2 ++
 ruamoko/qwaq/ui/view.r | 12 ++++++++++++
 2 files changed, 14 insertions(+)

diff --git a/ruamoko/qwaq/ui/view.h b/ruamoko/qwaq/ui/view.h
index 09a8ab8ba..4752c4349 100644
--- a/ruamoko/qwaq/ui/view.h
+++ b/ruamoko/qwaq/ui/view.h
@@ -67,6 +67,8 @@ enum {
 -move: (Point) delta;
 -resize: (Extent) delta;
 -move:(Point)dpos andResize:(Extent)dsize;
+-moveTo:(Point)pos;	// does not redraw
+-resizeTo:(Extent)size;	// does not redraw
 -grow: (Extent) delta;
 -(ListenerGroup *)onEvent;
 -handleEvent: (qwaq_event_t *) event;
diff --git a/ruamoko/qwaq/ui/view.r b/ruamoko/qwaq/ui/view.r
index f47d85f63..a6817b81d 100644
--- a/ruamoko/qwaq/ui/view.r
+++ b/ruamoko/qwaq/ui/view.r
@@ -277,6 +277,18 @@ updateScreenCursor (View *view)
 	return self;
 }
 
+-moveTo:(Point)pos
+{
+	self.pos = pos;
+	return self;
+}
+
+-resizeTo:(Extent)size
+{
+	self.size = size;
+	return self;
+}
+
 -grow: (Extent) delta
 {
 	Point       dpos = {};