[orca/570658] Only add space before role name if we're presenting text

[William Walker <wwalker src gnome org>]

commit bbccd2fcc7409a8558b59a12358d03f739543282
Author: Willie Walker <william walker sun com>
Date:   Tue Jul 7 11:38:33 2009 -0400

    Only add space before role name if we're presenting text

 src/orca/formatting.py |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/src/orca/formatting.py b/src/orca/formatting.py
index 9e8b2fd..4578cd9 100644
--- a/src/orca/formatting.py
+++ b/src/orca/formatting.py
@@ -483,7 +483,7 @@ formatting = {
                               + (columnHeaderIfToggleAndNoText and [Region(" "), Component(obj, asString(columnHeaderIfToggleAndNoText))])\
                               + ((realActiveDescendantDisplayedText and [Component(obj, asString(realActiveDescendantDisplayedText))])\
                                  or (imageDescription and [Region(" "), Component(obj, asString(imageDescription))]))\
-                              + (realActiveDescendantRoleName and [Region(" " + asString(realActiveDescendantRoleName))])\
+                              + (realActiveDescendantRoleName and [Component(obj, (realActiveDescendantDisplayedText and " " or "") + asString(realActiveDescendantRoleName))])\
                               + (expandableState and [Region(" " + asString(expandableState))])\
                               + (required and [Region(" " + asString(required))]))'
             },