diff options
author | Grégoire Jadi <gregoire.jadi@gmail.com> | 2013-08-13 16:04:50 +0200 |
---|---|---|
committer | Grégoire Jadi <gregoire.jadi@gmail.com> | 2013-08-13 16:04:50 +0200 |
commit | c9215889ccd18ba83856004a775461eedea07ad9 (patch) | |
tree | 1a485ed1c9146acb08cd486b05ee54495fd32a03 /lisp/xwidget.el | |
parent | 30e2a1217667de18501bba00899c43a6f410906b (diff) | |
download | emacs-c9215889ccd18ba83856004a775461eedea07ad9.tar.gz |
* lisp/xwidget.el (xwidget-display): Return a useful value.
* test/automated/xwidget-tests.el (xwidget-view-p): Use `xwidget-display'.
Diffstat (limited to 'lisp/xwidget.el')
-rw-r--r-- | lisp/xwidget.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/xwidget.el b/lisp/xwidget.el index c0d58972e14..1f0932ca7dd 100644 --- a/lisp/xwidget.el +++ b/lisp/xwidget.el @@ -59,12 +59,14 @@ see `make-xwidget' for types suitable for TYPE." ;; ))))) (defun xwidget-display (xwidget) - "Force xwidget to be displayed to create a xwidget_view." + "Force xwidget to be displayed to create a xwidget_view. Return +the window displaying XWIDGET." (let* ((buffer (xwidget-buffer xwidget)) (window (display-buffer buffer)) (frame (window-frame window))) (set-frame-visible frame t) - (redisplay t))) + (redisplay t) + window)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |