]> git.eshelyaron.com Git - emacs.git/commitdiff
; * test/lisp/url/url-auth-tests.el: More whitespace.
authorGlenn Morris <rgm@gnu.org>
Fri, 12 Feb 2016 23:19:45 +0000 (18:19 -0500)
committerGlenn Morris <rgm@gnu.org>
Fri, 12 Feb 2016 23:19:45 +0000 (18:19 -0500)
test/lisp/url/url-auth-tests.el

index 1fafaa1177c39ae881d3134a29145eb81afd9a54..0f221b2e13a685412f24b296291a8807bbebe7fb 100644 (file)
@@ -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