[orca] Give onBusyChanged some additional logic regarding when to do a SayAll

[Joanmarie Diggs <joanied src gnome org>]

commit 7a853739883985539345d3b8017f27653907f66f
Author: Joanmarie Diggs <jdiggs igalia com>
Date:   Wed May 20 17:40:16 2015 -0400

    Give onBusyChanged some additional logic regarding when to do a SayAll

 src/orca/scripts/toolkits/Gecko/script.py |   17 ++++++++++++++++-
 1 files changed, 16 insertions(+), 1 deletions(-)
---
diff --git a/src/orca/scripts/toolkits/Gecko/script.py b/src/orca/scripts/toolkits/Gecko/script.py
index c63f919..5577bcf 100644
--- a/src/orca/scripts/toolkits/Gecko/script.py
+++ b/src/orca/scripts/toolkits/Gecko/script.py
@@ -952,7 +952,22 @@ class Script(default.Script):
             debug.println(debug.LEVEL_INFO, msg)
             return True
 
-        if self.utilities.isFocusModeWidget(obj) or self.utilities.isLink(obj):
+        if self.utilities.isFocusModeWidget(obj):
+            msg = "INFO: Setting locus of focus to focusModeWidget %s" % obj
+            debug.println(debug.LEVEL_INFO, msg)
+            orca.setLocusOfFocus(event, obj)
+            return True
+
+        if self.utilities.isLink(obj) \
+           and obj.getState().contains(pyatspi.STATE_FOCUSED):
+            msg = "INFO: Setting locus of focus to focused link %s" % obj
+            debug.println(debug.LEVEL_INFO, msg)
+            orca.setLocusOfFocus(event, obj)
+            return True
+
+        if offset > 0:
+            msg = "INFO: Setting locus of focus to context obj %s" % obj
+            debug.println(debug.LEVEL_INFO, msg)
             orca.setLocusOfFocus(event, obj)
             return True