summaryrefslogtreecommitdiff
path: root/starling/minibuffer.scm
diff options
context:
space:
mode:
Diffstat (limited to 'starling/minibuffer.scm')
-rw-r--r--starling/minibuffer.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/starling/minibuffer.scm b/starling/minibuffer.scm
index dd8edbe..54aa50d 100644
--- a/starling/minibuffer.scm
+++ b/starling/minibuffer.scm
@@ -96,14 +96,14 @@
(_ #f))))
(define-method (on-boot (minibuffer <minibuffer>))
- (let* ((view-area (area (car (views minibuffer))))
+ (let* ((res (resolution (car (cameras minibuffer))))
(font (default-font))
(line-height (font-line-height font))
(padding 8.0))
(attach-to minibuffer
(make <filled-rect>
#:region (make-rect 0.0 0.0
- (rect-width view-area)
+ (vec2-x res)
(+ line-height (* padding 2.0)))
#:color (make-color 0.0 0.0 0.0 1.0))
(make <label>