From 0c5c85cf2b350c965bb1ffa5b2d77c2adebc406b Mon Sep 17 00:00:00 2001 From: Joakim Verona Date: Mon, 23 Jul 2012 15:28:30 +0200 Subject: [PATCH] small test changes --- lisp/xwidget-test.el | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/lisp/xwidget-test.el b/lisp/xwidget-test.el index 5aaff75b436..eabfc0a2817 100644 --- a/lisp/xwidget-test.el +++ b/lisp/xwidget-test.el @@ -87,10 +87,24 @@ (defun xwgir-test () (interactive) + (xwgir-require-namespace "Gtk" "3.0") + (put 'color-selection :xwgir-class '("Gtk" "ColorSelection")) + (xwgir-demo-a-xwgir-button) (xwgir-call-method (xwidget-at 1) "set_label" '( "xwgir set label!")) ) + +;; tentative testcase: +;; (xwgir-require-namespace "WebKit" "3.0") + +;; (put 'webkit-osr :xwgir-class '("WebKit" "WebView")) +;; (xwgir-call-method (xwidget-at 1) "set_zoom_level" '(3.0)) + +;; (xwgir-require-namespace "Gtk" "3.0") +;; (put 'color-selection :xwgir-class '("Gtk" "ColorSelection")) + + (xwidget-demo "basic" (xwidget-insert (point-min) 'button "button" 40 50 ) (xwidget-insert 15 'toggle "toggle" 60 30 ) -- 2.39.5