Index: main/widget/textbox.lisp
===================================================================
--- main/widget/textbox.lisp	(revision main,40)
+++ main/widget/textbox.lisp	(revision main,44)
@@ -102,5 +102,6 @@
                 (setf (insertion-point textbox) (insertion-point textbox)))))
            (t
-            (if (or (keywordp key) (member key '(#\Return #\Tab #\Esc)))
+            (if (or (keywordp key)
+                    (member key '(#\Return #\Newline #\Tab #\Esc)))
                 (let ((r (funcall callback key)))
                   (when r
