Fix comments.

svn path=/trunk/netsurf/; revision=13298

1 files changed, 7 insertions, 1 deletions

diff --git a/riscos/window.c b/riscos/window.c
index 0489a47c3..0d8af3867 100644
--- a/riscos/window.c
+++ b/riscos/window.c
@@ -3002,7 +3002,7 @@ void ro_gui_window_scroll(wimp_scroll *scroll)
 
 /**
  * Scroll a browser window, either via the core or directly using the
- * normal Wimp scoll interface.
+ * normal Wimp_OpenWindow interface.
  *
  * Scroll steps are supplied in terms of the (extended) Scroll Event direction
  * values returned by Wimp_Poll.  Special values of 0x7fffffff and 0x80000000
@@ -3029,6 +3029,8 @@ void ro_gui_window_scroll_action(struct gui_window *g,
 	if (g == NULL)
 		return;
 
+	/* Get the current window, toolbar and pointer details. */
+
 	state.w = g->window;
 	error = xwimp_get_window_state(&state);
 	if (error) {
@@ -3053,6 +3055,10 @@ void ro_gui_window_scroll_action(struct gui_window *g,
 		return;
 	}
 
+	/* Turn the scroll requirement from Scroll Event codes into coordinates
+	 * that the core can understand.
+	 */
+
 	switch (scroll_x) {
 	case wimp_SCROLL_PAGE_LEFT:
 		step_x = SCROLL_PAGE_DOWN;