aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2014-04-25 12:35:01 +0200
committerMichael Albinus2014-04-25 12:35:01 +0200
commit844465d6cac7c243e37e446067b1a2e06be293da (patch)
tree5ed7f84e6b0cc77b981aea715b2c7e6f4b321ac0
parent402a211fd318d0aef8de6cb606e678d2ec64706d (diff)
downloademacs-844465d6cac7c243e37e446067b1a2e06be293da.tar.gz
emacs-844465d6cac7c243e37e446067b1a2e06be293da.zip
* automated/tramp-tests.el (top):
* automated/file-notify-tests.el (top): Do not disable interactive passwords in batch mode. (password-cache-expiry): Set to nil.
-rw-r--r--test/ChangeLog7
-rw-r--r--test/automated/file-notify-tests.el13
-rw-r--r--test/automated/tramp-tests.el10
3 files changed, 11 insertions, 19 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index 45844607d34..7d4e9d5e687 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,10 @@
12014-04-25 Michael Albinus <michael.albinus@gmx.de>
2
3 * automated/tramp-tests.el (top):
4 * automated/file-notify-tests.el (top): Do not disable interactive
5 passwords in batch mode.
6 (password-cache-expiry): Set to nil.
7
12014-04-24 Michael Albinus <michael.albinus@gmx.de> 82014-04-24 Michael Albinus <michael.albinus@gmx.de>
2 9
3 * automated/file-notify-tests.el 10 * automated/file-notify-tests.el
diff --git a/test/automated/file-notify-tests.el b/test/automated/file-notify-tests.el
index f3ad6dfbe26..d9a5b039216 100644
--- a/test/automated/file-notify-tests.el
+++ b/test/automated/file-notify-tests.el
@@ -22,7 +22,7 @@
22;; Some of the tests require access to a remote host files. Since 22;; Some of the tests require access to a remote host files. Since
23;; this could be problematic, a mock-up connection method "mock" is 23;; this could be problematic, a mock-up connection method "mock" is
24;; used. Emulating a remote connection, it simply calls "sh -i". 24;; used. Emulating a remote connection, it simply calls "sh -i".
25;; Tramp's file name handler still run, so this test is sufficient 25;; Tramp's file name handlers still run, so this test is sufficient
26;; except for connection establishing. 26;; except for connection establishing.
27 27
28;; If you want to test a real Tramp connection, set 28;; If you want to test a real Tramp connection, set
@@ -31,10 +31,6 @@
31;; remote host, set this environment variable to "/dev/null" or 31;; remote host, set this environment variable to "/dev/null" or
32;; whatever is appropriate on your system. 32;; whatever is appropriate on your system.
33 33
34;; When running the tests in batch mode, it must NOT require an
35;; interactive password prompt unless the environment variable
36;; $REMOTE_ALLOW_PASSWORD is set.
37
38;; A whole test run can be performed calling the command `file-notify-test-all'. 34;; A whole test run can be performed calling the command `file-notify-test-all'.
39 35
40;;; Code: 36;;; Code:
@@ -64,13 +60,10 @@
64(defvar file-notify--test-results nil) 60(defvar file-notify--test-results nil)
65(defvar file-notify--test-event nil) 61(defvar file-notify--test-event nil)
66 62
67(setq tramp-verbose 0 63(setq password-cache-expiry nil
64 tramp-verbose 0
68 tramp-message-show-message nil) 65 tramp-message-show-message nil)
69 66
70;; Disable interactive passwords in batch mode.
71(when (and noninteractive (not (getenv "REMOTE_ALLOW_PASSWORD")))
72 (defalias 'tramp-read-passwd 'ignore))
73
74;; This shall happen on hydra only. 67;; This shall happen on hydra only.
75(when (getenv "NIX_STORE") 68(when (getenv "NIX_STORE")
76 (add-to-list 'tramp-remote-path 'tramp-own-remote-path)) 69 (add-to-list 'tramp-remote-path 'tramp-own-remote-path))
diff --git a/test/automated/tramp-tests.el b/test/automated/tramp-tests.el
index 59a7c152a1a..2640ee9cef5 100644
--- a/test/automated/tramp-tests.el
+++ b/test/automated/tramp-tests.el
@@ -24,7 +24,7 @@
24;; Some of the tests require access to a remote host files. Since 24;; Some of the tests require access to a remote host files. Since
25;; this could be problematic, a mock-up connection method "mock" is 25;; this could be problematic, a mock-up connection method "mock" is
26;; used. Emulating a remote connection, it simply calls "sh -i". 26;; used. Emulating a remote connection, it simply calls "sh -i".
27;; Tramp's file name handler still run, so this test is sufficient 27;; Tramp's file name handlers still run, so this test is sufficient
28;; except for connection establishing. 28;; except for connection establishing.
29 29
30;; If you want to test a real Tramp connection, set 30;; If you want to test a real Tramp connection, set
@@ -33,10 +33,6 @@
33;; remote host, set this environment variable to "/dev/null" or 33;; remote host, set this environment variable to "/dev/null" or
34;; whatever is appropriate on your system. 34;; whatever is appropriate on your system.
35 35
36;; When running the tests in batch mode, it must NOT require an
37;; interactive password prompt unless the environment variable
38;; $REMOTE_ALLOW_PASSWORD is set.
39
40;; A whole test run can be performed calling the command `tramp-test-all'. 36;; A whole test run can be performed calling the command `tramp-test-all'.
41 37
42;;; Code: 38;;; Code:
@@ -73,10 +69,6 @@
73 tramp-copy-size-limit nil 69 tramp-copy-size-limit nil
74 tramp-message-show-message nil) 70 tramp-message-show-message nil)
75 71
76;; Disable interactive passwords in batch mode.
77(when (and noninteractive (not (getenv "REMOTE_ALLOW_PASSWORD")))
78 (defalias 'tramp-read-passwd 'ignore))
79
80;; This shall happen on hydra only. 72;; This shall happen on hydra only.
81(when (getenv "NIX_STORE") 73(when (getenv "NIX_STORE")
82 (add-to-list 'tramp-remote-path 'tramp-own-remote-path)) 74 (add-to-list 'tramp-remote-path 'tramp-own-remote-path))