From c366a445c56024aa82289fb28b89bf2087081402 Mon Sep 17 00:00:00 2001
From: mfranz <mfranz>
Date: Thu, 29 Jan 2009 18:50:16 +0000
Subject: [PATCH] textbox: add <top-line> param that sets first line (last line
 if negative)

---
 src/GUI/dialog.cxx | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/GUI/dialog.cxx b/src/GUI/dialog.cxx
index 33b51b93f..6d710e7e6 100644
--- a/src/GUI/dialog.cxx
+++ b/src/GUI/dialog.cxx
@@ -798,6 +798,9 @@ FGDialog::makeObject (SGPropertyNode *props, int parentWidth, int parentHeight)
             obj->setSize(width, height);
         setupObject(obj, props);
         setColor(obj, props, FOREGROUND|LABEL);
+
+        int top = props->getIntValue("top-line", 0);
+        obj->setTopLineInWindow(top < 0 ? unsigned(-1) >> 1 : top);
         return obj;
 
     } else if (type == "select") {