From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 22 Jul 2002 15:21:41 +0000 (+0000)
Subject: (browse-url-lynx-input-attempts): Use defcustom.
X-Git-Tag: ttn-vms-21-2-B4~13921
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=64f6f48618753d6147a711bf73252227bb19dd3a;p=emacs.git

(browse-url-lynx-input-attempts): Use defcustom.
(browse-url-lynx-input-delay): Add custom type and group.
---

diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index fdd69deba8b..cdda3ef98d7 100644
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -518,11 +518,15 @@ down (this *won't* always work)."
   :version "20.3"
   :group 'browse-url)
 
-(defvar browse-url-lynx-input-attempts 10
-  "*How many times to try to move down from a series of lynx input fields.")
+(defcustom browse-url-lynx-input-attempts 10
+  "*How many times to try to move down from a series of lynx input fields."
+  :type 'integer
+  :group 'browse-url)
 
 (defcustom browse-url-lynx-input-delay 0.2
-  "*How many seconds to wait for lynx between moves down from an input field.")
+  "*How many seconds to wait for lynx between moves down from an input field."
+  :type 'number
+  :group 'browse-url)
 
 (defcustom browse-url-kde-program "kfmclient"
   "*The name by which to invoke the KDE web browser."