[elpa] externals/url-http-oauth 8c0fc46986 1/2: Fix url-http-oauth-interposed-p for default case

[Thomas Fitzsimmons]

branch: externals/url-http-oauth
commit 8c0fc4698610e9ae6234acbdcc7ba716959e39ec
Author: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Commit: Thomas Fitzsimmons <fitzsim@fitzsim.org>

    Fix url-http-oauth-interposed-p for default case
    
    * url-http-oauth.el (url-http-oauth-interposed-p): Check if regexp
    is nil.
---
 url-http-oauth.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/url-http-oauth.el b/url-http-oauth.el
index 8be12bdde5..bcc894e395 100644
--- a/url-http-oauth.el
+++ b/url-http-oauth.el
@@ -158,8 +158,9 @@ This function does the opposite of 
`url-http-oauth-interpose'."
 (defun url-http-oauth-interposed-p (url)
   "Return non-nil if `url' will use OAuth 2.0 to access URL.
 URL is an object."
-  (string-match-p url-http-oauth--interposed-regexp
-                  (url-http-oauth--url-string url)))
+  (when url-http-oauth--interposed-regexp
+    (string-match-p url-http-oauth--interposed-regexp
+                    (url-http-oauth--url-string url))))
 
 (defvar url-http-response-status)
 (defvar auth-source-creation-prompts)