From c1d33065ad509ddc357961089b28e630a4c67b1c Mon Sep 17 00:00:00 2001
From: nicolas-p <z.nicolas@gmail.com>
Date: Wed, 24 May 2017 13:44:19 +0200
Subject: [PATCH] editors: added pref-dim* for action-editor

---
 basis/ui/gadgets/editors/editors.factor | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/basis/ui/gadgets/editors/editors.factor b/basis/ui/gadgets/editors/editors.factor
index f14e2b6ed2..39710d3c46 100644
--- a/basis/ui/gadgets/editors/editors.factor
+++ b/basis/ui/gadgets/editors/editors.factor
@@ -670,6 +670,13 @@ M: action-editor draw-gadget*
         call-next-method
     ] if ;
 
+M: action-editor pref-dim*
+    dup draw-default-text? [
+        [ font>> ] [ default-text>> ] bi text-dim { 1 0 } v+
+    ] [
+        call-next-method
+    ] if ;
+
 TUPLE: action-field < field quot ;
 
 : <action-field> ( quot: ( string -- ) -- gadget )