Bidi test case for xwidgets

Create a buffer with some text and a button.
Make the buffer be right-to-left.

1 files changed, 6 insertions, 0 deletions

diff --git a/test/xwidget-test-manual.el b/test/xwidget-test-manual.el
index 2ded7868df6..85db981a53e 100644
--- a/test/xwidget-test-manual.el
+++ b/test/xwidget-test-manual.el
@@ -39,6 +39,12 @@
               (xwidget-insert (point-min) 'Button  "button" 60  50)
               (define-key (current-local-map) [xwidget-event] 'xwidget-handler-demo-basic))
 
+(xwidget-demo "a-button-bidi"
+              (xwidget-insert (point-min) 'Button  "button" 60  50)
+              (set (make-local-variable 'bidi-paragraph-direction) 'right-to-left)
+              (define-key (current-local-map) [xwidget-event] 'xwidget-handler-demo-basic))
+
+
 (xwidget-demo "a-toggle-button"
               (xwidget-insert (point-min) 'ToggleButton  "toggle" 60  50)
               (define-key (current-local-map) [xwidget-event] 'xwidget-handler-demo-basic))