[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master cd90b90: ; * test/lisp/url/url-auth-tests.el: More
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] master cd90b90: ; * test/lisp/url/url-auth-tests.el: More whitespace. |
Date: |
Fri, 12 Feb 2016 23:19:53 +0000 |
branch: master
commit cd90b902b117508ce7b47bf6bb10e0d627d45d40
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>
; * test/lisp/url/url-auth-tests.el: More whitespace.
---
test/lisp/url/url-auth-tests.el | 13 +++++++------
1 files changed, 7 insertions(+), 6 deletions(-)
diff --git a/test/lisp/url/url-auth-tests.el b/test/lisp/url/url-auth-tests.el
index 1fafaa1..0f221b2 100644
--- a/test/lisp/url/url-auth-tests.el
+++ b/test/lisp/url/url-auth-tests.el
@@ -202,11 +202,12 @@ test and cannot be passed by arguments to
`url-digest-auth'."
(list "example.org:80"
(cons (or (plist-get challenge :realm) "/")
(cons (plist-get challenge :username)
- (url-digest-auth-create-key (plist-get challenge :username)
- (plist-get challenge :password)
- (plist-get challenge :realm)
- (plist-get challenge :method)
- (plist-get challenge :uri)))))))
+ (url-digest-auth-create-key
+ (plist-get challenge :username)
+ (plist-get challenge :password)
+ (plist-get challenge :realm)
+ (plist-get challenge :method)
+ (plist-get challenge :uri)))))))
(setq auth (url-digest-auth (url-generic-parse-url url) nil nil
(plist-get challenge :realm) attrs))
(should auth)
@@ -227,7 +228,7 @@ test and cannot be passed by arguments to
`url-digest-auth'."
(should (string-match ".*response=\"\\(.*?\\)\".*" auth))
(should (string= (match-string 1 auth)
(plist-get challenge :expected-response))))
- )))
+ )))
(ert-deftest url-auth-test-digest-auth-opaque ()
"Check that `opaque' value is added to result when presented by
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master cd90b90: ; * test/lisp/url/url-auth-tests.el: More whitespace.,
Glenn Morris <=