From: Chong Yidong <cyd@stupidchicken.com>
Date: Fri, 13 Apr 2007 14:52:03 +0000 (+0000)
Subject: (url-max-redirections): New var.
X-Git-Tag: emacs-pretest-22.0.98~94
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2faae86bd7a2bb27b3bb810ff1c6eb4c5b3181b8;p=emacs.git

(url-max-redirections): New var.
---

diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el
index 705eb947001..d0bd9a84c05 100644
--- a/lisp/url/url-vars.el
+++ b/lisp/url/url-vars.el
@@ -320,6 +320,12 @@ undefined."
   "\\`\\([-a-zA-Z0-9+.]+:\\)"
   "A regular expression that will match an absolute URL.")
 
+(defcustom url-max-redirections 30
+  "*The maximum number of redirection requests to honor in a HTTP connection.
+A negative number means to honor an unlimited number of redirection requests."
+  :type 'integer
+  :group 'url)
+
 (defcustom url-confirmation-func 'y-or-n-p
   "*What function to use for asking yes or no functions.
 Possible values are `yes-or-no-p' or `y-or-n-p', or any function that