]> code.delx.au - gnu-emacs/commitdiff
* test/automated/xwidget-tests.el: Emacs parallel API changed.
authorGrégoire Jadi <gregoire.jadi@gmail.com>
Mon, 19 Aug 2013 18:46:58 +0000 (20:46 +0200)
committerGrégoire Jadi <gregoire.jadi@gmail.com>
Mon, 19 Aug 2013 18:46:58 +0000 (20:46 +0200)
test/automated/xwidget-tests.el

index 7beaeda000ec38758bf1126fbddfe7a6199e0397..7f79c9422f639f2879d4db148a77207609c5371a 100644 (file)
@@ -38,8 +38,8 @@
                     (let* ((buffer (current-buffer))
                            (xwidget (make-xwidget beg end type title width height data buffer)))
                       (set-xwidget-query-on-exit-flag xwidget nil)
-                      (parallel-send (coerce (xwidget-info xwidget) 'list))
-                      (parallel-send (buffer-name buffer))
+                      (parallel-remote-send (coerce (xwidget-info xwidget) 'list))
+                      (parallel-remote-send (buffer-name buffer))
                       (buffer-name (xwidget-buffer xwidget)))))
                 :env (list beg end type title width height data)))
          (results (parallel-get-results proc)))
@@ -57,7 +57,7 @@
                   (parallel-start (lambda ()
                                     (require 'xwidget)
                                     (let ((xwidget (make-xwidget 1 1 'Button "Button" 100 100 nil)))
-                                      (parallel-send (xwidget-query-on-exit-flag xwidget))
+                                      (parallel-remote-send (xwidget-query-on-exit-flag xwidget))
                                       (set-xwidget-query-on-exit-flag xwidget nil)
                                       (xwidget-query-on-exit-flag xwidget))))))))