[orca] More improvements to braille panning functionality for WebKitGtk content.

[Joanmarie Diggs <joanied src gnome org>]

commit f12a15a7f3f7090cadf954e74d47812b7058caa4
Author: Joanmarie Diggs <jdiggs igalia com>
Date:   Mon Aug 13 14:26:37 2012 -0400

    More improvements to braille panning functionality for WebKitGtk content.

 src/orca/scripts/toolkits/WebKitGtk/script.py |   14 ++++++++++++++
 1 files changed, 14 insertions(+), 0 deletions(-)
---
diff --git a/src/orca/scripts/toolkits/WebKitGtk/script.py b/src/orca/scripts/toolkits/WebKitGtk/script.py
index 9555bd9..fd270a3 100644
--- a/src/orca/scripts/toolkits/WebKitGtk/script.py
+++ b/src/orca/scripts/toolkits/WebKitGtk/script.py
@@ -537,6 +537,13 @@ class Script(default.Script):
         orca.setLocusOfFocus(None, obj, notifyScript=False)
         self.updateBraille(obj)
 
+        # Hack: When panning to the left in a document, we want to start at
+        # the right/bottom of each new object. For now, we'll pan there.
+        # When time permits, we'll give our braille code some smarts.
+        while self.panBrailleInDirection(panToLeft=False):
+            pass
+        self.refreshBraille(False)
+
         return True
 
     def panBrailleRight(self, inputEvent=None, panAmount=0):
@@ -553,6 +560,13 @@ class Script(default.Script):
         orca.setLocusOfFocus(None, obj, notifyScript=False)
         self.updateBraille(obj)
 
+        # Hack: When panning to the right in a document, we want to start at
+        # the left/top of each new object. For now, we'll pan there. When time
+        # permits, we'll give our braille code some smarts.
+        while self.panBrailleInDirection(panToLeft=True):
+            pass
+        self.refreshBraille(False)
+
         return True
 
     def sayAll(self, inputEvent):