(webjump-sample-sites): Define with defvar.

(webjump-state-to-postal-alist): Likewise.
author: Richard M. Stallman 1996-08-31 02:34:25 +0000
committer: Richard M. Stallman 1996-08-31 02:34:25 +0000
commit: 8a5f6f7f384a792f84e59cf7c6d30f7aae4a7f07 (patch)
tree: 6f004e380104af6c9009a4cf0f58ea99cde959c7
parent: d1bc41829ab35a93f2487139ffea3668d9d9b4ce (diff)
download: emacs-8a5f6f7f384a792f84e59cf7c6d30f7aae4a7f07.tar.gz
emacs-8a5f6f7f384a792f84e59cf7c6d30f7aae4a7f07.zip
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/webjump.el b/lisp/webjump.el
index 7160f3aa76d..7812cce6fea 100644
--- a/lisp/webjump.el
+++ b/lisp/webjump.el
@@ -79,7 +79,7 @@
 ;;------------------------------------------------------------------- Constants
-(defconst-TEST webjump-sample-sites
+(defvar webjump-sample-sites
  '(("AltaVista" . 
     [simple-query
      "www.altavista.digital.com"
@@ -184,7 +184,7 @@
    )
  "Sample hotlist for WebJump.")
-(defconst webjump-state-to-postal-alist
+(defvar webjump-state-to-postal-alist
  '(("Alabama" . "al") ("Alaska" . "ak") ("Arizona" . "az") ("Arkansas" . "ar")
    ("California" . "ca") ("Colorado" . "co") ("Connecticut" . "ct")
    ("Delaware" . "de") ("Florida" . "fl") ("Georgia" . "ga") ("Hawaii" . "hi")
author	Richard M. Stallman	1996-08-31 02:34:25 +0000
committer	Richard M. Stallman	1996-08-31 02:34:25 +0000
commit	8a5f6f7f384a792f84e59cf7c6d30f7aae4a7f07 (patch)
tree	6f004e380104af6c9009a4cf0f58ea99cde959c7
parent	d1bc41829ab35a93f2487139ffea3668d9d9b4ce (diff)
download	emacs-8a5f6f7f384a792f84e59cf7c6d30f7aae4a7f07.tar.gz emacs-8a5f6f7f384a792f84e59cf7c6d30f7aae4a7f07.zip

diff --git a/lisp/webjump.el b/lisp/webjump.el index 7160f3aa76d..7812cce6fea 100644 --- a/lisp/webjump.el +++ b/lisp/webjump.el
@@ -79,7 +79,7 @@
79		79
80	;;------------------------------------------------------------------- Constants	80	;;------------------------------------------------------------------- Constants
81		81
82	(defconst-TEST webjump-sample-sites	82	(defvar webjump-sample-sites
83	'(("AltaVista" .	83	'(("AltaVista" .
84	[simple-query	84	[simple-query
85	"www.altavista.digital.com"	85	"www.altavista.digital.com"
@@ -184,7 +184,7 @@
184	)	184	)
185	"Sample hotlist for WebJump.")	185	"Sample hotlist for WebJump.")
186		186
187	(defconst webjump-state-to-postal-alist	187	(defvar webjump-state-to-postal-alist
188	'(("Alabama" . "al") ("Alaska" . "ak") ("Arizona" . "az") ("Arkansas" . "ar")	188	'(("Alabama" . "al") ("Alaska" . "ak") ("Arizona" . "az") ("Arkansas" . "ar")
189	("California" . "ca") ("Colorado" . "co") ("Connecticut" . "ct")	189	("California" . "ca") ("Colorado" . "co") ("Connecticut" . "ct")
190	("Delaware" . "de") ("Florida" . "fl") ("Georgia" . "ga") ("Hawaii" . "hi")	190	("Delaware" . "de") ("Florida" . "fl") ("Georgia" . "ga") ("Hawaii" . "hi")