diff options
| author | Michael Albinus | 2018-06-29 10:17:46 +0200 |
|---|---|---|
| committer | Michael Albinus | 2018-06-29 10:17:46 +0200 |
| commit | 45390596e6d59e14c8f9c0596aeb4f4141d0c1e8 (patch) | |
| tree | f232017bd1543efebd282b33c300989d76df5ddc | |
| parent | b2c854a0e1364eab11151da7fa7558053bc834c4 (diff) | |
| download | emacs-45390596e6d59e14c8f9c0596aeb4f4141d0c1e8.tar.gz emacs-45390596e6d59e14c8f9c0596aeb4f4141d0c1e8.zip | |
Sync with Tramp 2.4.0
* doc/misc/trampver.texi:
* lisp/net/trampver.el: Change version to "2.4.0".
* lisp/net/tramp-gvfs.el (tramp-gvfs-handler-mounted-unmounted):
Ignore unknown GVFS methods.
* test/lisp/net/tramp-tests.el (tramp-test42-asynchronous-requests):
Tag as :unstable.
| -rw-r--r-- | doc/misc/trampver.texi | 2 | ||||
| -rw-r--r-- | lisp/net/tramp-gvfs.el | 25 | ||||
| -rw-r--r-- | lisp/net/trampver.el | 6 | ||||
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 2 |
4 files changed, 18 insertions, 17 deletions
diff --git a/doc/misc/trampver.texi b/doc/misc/trampver.texi index eef2d9b6907..6d02b043b64 100644 --- a/doc/misc/trampver.texi +++ b/doc/misc/trampver.texi | |||
| @@ -8,7 +8,7 @@ | |||
| 8 | @c In the Tramp GIT, the version number is auto-frobbed from | 8 | @c In the Tramp GIT, the version number is auto-frobbed from |
| 9 | @c configure.ac, so you should edit that file and run | 9 | @c configure.ac, so you should edit that file and run |
| 10 | @c "autoconf && ./configure" to change the version number. | 10 | @c "autoconf && ./configure" to change the version number. |
| 11 | @set trampver 2.4.0-pre | 11 | @set trampver 2.4.0 |
| 12 | 12 | ||
| 13 | @c Other flags from configuration | 13 | @c Other flags from configuration |
| 14 | @set instprefix /usr/local | 14 | @set instprefix /usr/local |
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el index a30d7ef7138..1f40339c271 100644 --- a/lisp/net/tramp-gvfs.el +++ b/lisp/net/tramp-gvfs.el | |||
| @@ -1553,18 +1553,19 @@ file-notify events." | |||
| 1553 | user (url-user uri) | 1553 | user (url-user uri) |
| 1554 | host (url-host uri) | 1554 | host (url-host uri) |
| 1555 | port (url-portspec uri))) | 1555 | port (url-portspec uri))) |
| 1556 | (with-parsed-tramp-file-name | 1556 | (when (member method tramp-gvfs-methods) |
| 1557 | (tramp-make-tramp-file-name method user domain host port "") nil | 1557 | (with-parsed-tramp-file-name |
| 1558 | (tramp-message | 1558 | (tramp-make-tramp-file-name method user domain host port "") nil |
| 1559 | v 6 "%s %s" | 1559 | (tramp-message |
| 1560 | signal-name (tramp-gvfs-stringify-dbus-message mount-info)) | 1560 | v 6 "%s %s" |
| 1561 | (tramp-flush-file-property v "/" "list-mounts") | 1561 | signal-name (tramp-gvfs-stringify-dbus-message mount-info)) |
| 1562 | (if (string-equal (downcase signal-name) "unmounted") | 1562 | (tramp-flush-file-property v "/" "list-mounts") |
| 1563 | (tramp-flush-file-properties v "/") | 1563 | (if (string-equal (downcase signal-name) "unmounted") |
| 1564 | ;; Set mountpoint and location. | 1564 | (tramp-flush-file-properties v "/") |
| 1565 | (tramp-set-file-property v "/" "fuse-mountpoint" fuse-mountpoint) | 1565 | ;; Set mountpoint and location. |
| 1566 | (tramp-set-connection-property | 1566 | (tramp-set-file-property v "/" "fuse-mountpoint" fuse-mountpoint) |
| 1567 | v "default-location" default-location))))))) | 1567 | (tramp-set-connection-property |
| 1568 | v "default-location" default-location)))))))) | ||
| 1568 | 1569 | ||
| 1569 | (when tramp-gvfs-enabled | 1570 | (when tramp-gvfs-enabled |
| 1570 | (dbus-register-signal | 1571 | (dbus-register-signal |
diff --git a/lisp/net/trampver.el b/lisp/net/trampver.el index 46af51ebfdb..0b83afcc590 100644 --- a/lisp/net/trampver.el +++ b/lisp/net/trampver.el | |||
| @@ -7,7 +7,7 @@ | |||
| 7 | ;; Maintainer: Michael Albinus <michael.albinus@gmx.de> | 7 | ;; Maintainer: Michael Albinus <michael.albinus@gmx.de> |
| 8 | ;; Keywords: comm, processes | 8 | ;; Keywords: comm, processes |
| 9 | ;; Package: tramp | 9 | ;; Package: tramp |
| 10 | ;; Version: 2.4.0-pre | 10 | ;; Version: 2.4.0 |
| 11 | 11 | ||
| 12 | ;; This file is part of GNU Emacs. | 12 | ;; This file is part of GNU Emacs. |
| 13 | 13 | ||
| @@ -33,7 +33,7 @@ | |||
| 33 | ;; should be changed only there. | 33 | ;; should be changed only there. |
| 34 | 34 | ||
| 35 | ;;;###tramp-autoload | 35 | ;;;###tramp-autoload |
| 36 | (defconst tramp-version "2.4.0-pre" | 36 | (defconst tramp-version "2.4.0" |
| 37 | "This version of Tramp.") | 37 | "This version of Tramp.") |
| 38 | 38 | ||
| 39 | ;;;###tramp-autoload | 39 | ;;;###tramp-autoload |
| @@ -55,7 +55,7 @@ | |||
| 55 | ;; Check for Emacs version. | 55 | ;; Check for Emacs version. |
| 56 | (let ((x (if (>= emacs-major-version 24) | 56 | (let ((x (if (>= emacs-major-version 24) |
| 57 | "ok" | 57 | "ok" |
| 58 | (format "Tramp 2.4.0-pre is not fit for %s" | 58 | (format "Tramp 2.4.0 is not fit for %s" |
| 59 | (replace-regexp-in-string "\n" "" (emacs-version)))))) | 59 | (replace-regexp-in-string "\n" "" (emacs-version)))))) |
| 60 | (unless (string-equal "ok" x) (error "%s" x))) | 60 | (unless (string-equal "ok" x) (error "%s" x))) |
| 61 | 61 | ||
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index f2d9b0ab47e..504b0aae785 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -4883,7 +4883,7 @@ Use the `ls' command." | |||
| 4883 | "Check parallel asynchronous requests. | 4883 | "Check parallel asynchronous requests. |
| 4884 | Such requests could arrive from timers, process filters and | 4884 | Such requests could arrive from timers, process filters and |
| 4885 | process sentinels. They shall not disturb each other." | 4885 | process sentinels. They shall not disturb each other." |
| 4886 | :tags '(:expensive-test) | 4886 | :tags '(:expensive-test :unstable) |
| 4887 | (skip-unless (tramp--test-enabled)) | 4887 | (skip-unless (tramp--test-enabled)) |
| 4888 | (skip-unless (tramp--test-sh-p)) | 4888 | (skip-unless (tramp--test-sh-p)) |
| 4889 | 4889 | ||