allow scrolling to top and bottom from lua

src/guichan/include/guichan/widgets/scrollarea.h

@@ -162,6 +162,10 @@ namespace gcn
          */
         virtual void setScrollPolicy(unsigned int hPolicy, unsigned int vPolicy);
 
+        virtual void scrollToBottom();
+
+        virtual void scrollToTop();
+
         /**
          * Sets the amount to scroll verticaly.
          *

src/guichan/widgets/scrollarea.cpp

@@ -181,6 +181,16 @@ namespace gcn
         checkPolicies();
     }
 
+    void ScrollArea::scrollToBottom()
+    {
+        setVerticalScrollAmount(getVerticalMaxScroll());
+    }
+
+    void ScrollArea::scrollToTop()
+    {
+        setVerticalScrollAmount(0);
+    }
+
     void ScrollArea::setVerticalScrollAmount(int vScroll)
     {
         int max = getVerticalMaxScroll();

src/tolua/ui.pkg

@@ -325,6 +325,8 @@ class ScrollArea : public BasicContainer
 	virtual Widget *getContent();
 	virtual void setScrollbarWidth(int width);
 	virtual int getScrollbarWidth();
+        virtual void scrollToBottom();
+        virtual void scrollToTop();
 };
 
 class ImageWidget : public Widget