diff options
| author | Damien Cassou | 2017-11-07 09:33:22 +0100 |
|---|---|---|
| committer | Nicolas Petton | 2018-06-05 15:50:54 +0200 |
| commit | 53f044c22f9f94e7663b7343c5100904a68f6de5 (patch) | |
| tree | f1cde25351e011895a23d6de511d5fb8b669170e /test | |
| parent | 59d44b528e028192a7d3d576795a7957c92da682 (diff) | |
| download | emacs-53f044c22f9f94e7663b7343c5100904a68f6de5.tar.gz emacs-53f044c22f9f94e7663b7343c5100904a68f6de5.zip | |
Fix indentation in auth-source-pass-tests.el
* test/lisp/auth-source-pass-tests.el
(auth-source-pass-only-return-entries-that-can-be-open): Fix indentation.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/auth-source-pass-tests.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/test/lisp/auth-source-pass-tests.el b/test/lisp/auth-source-pass-tests.el index 557a34ff596..adb0b5d93fe 100644 --- a/test/lisp/auth-source-pass-tests.el +++ b/test/lisp/auth-source-pass-tests.el | |||
| @@ -206,12 +206,10 @@ This function is intended to be set to `auth-source-debug`." | |||
| 206 | 206 | ||
| 207 | (ert-deftest auth-source-pass-only-return-entries-that-can-be-open () | 207 | (ert-deftest auth-source-pass-only-return-entries-that-can-be-open () |
| 208 | (cl-letf (((symbol-function 'auth-source-pass-entries) | 208 | (cl-letf (((symbol-function 'auth-source-pass-entries) |
| 209 | (lambda () '("foo.site.com" "bar.site.com" | 209 | (lambda () '("foo.site.com" "bar.site.com" "mail/baz.site.com/scott"))) |
| 210 | "mail/baz.site.com/scott"))) | ||
| 211 | ((symbol-function 'auth-source-pass--entry-valid-p) | 210 | ((symbol-function 'auth-source-pass--entry-valid-p) |
| 212 | ;; only foo.site.com and "mail/baz.site.com/scott" are valid | 211 | ;; only foo.site.com and "mail/baz.site.com/scott" are valid |
| 213 | (lambda (entry) (member entry '("foo.site.com" | 212 | (lambda (entry) (member entry '("foo.site.com" "mail/baz.site.com/scott"))))) |
| 214 | "mail/baz.site.com/scott"))))) | ||
| 215 | (should (equal (auth-source-pass--find-all-by-entry-name "foo.site.com" "someuser") | 213 | (should (equal (auth-source-pass--find-all-by-entry-name "foo.site.com" "someuser") |
| 216 | '("foo.site.com"))) | 214 | '("foo.site.com"))) |
| 217 | (should (equal (auth-source-pass--find-all-by-entry-name "bar.site.com" "someuser") | 215 | (should (equal (auth-source-pass--find-all-by-entry-name "bar.site.com" "someuser") |