# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1244097613 0
# Node ID e47b96db18de69c68473d6ba3b17d0c273781aa0
# Parent  fd724c60cb3e485d1154dda8764352af8b7671f6
(solar-n-hemi-seasons, solar-s-hemi-seasons):
Make into defcustoms.  (Bug#3429)

diff -r fd724c60cb3e -r e47b96db18de lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Jun 04 03:13:28 2009 +0000
+++ b/lisp/ChangeLog	Thu Jun 04 06:40:13 2009 +0000
@@ -1,3 +1,8 @@
+2009-06-04  Glenn Morris  <rgm@gnu.org>
+
+	* calendar/solar.el (solar-n-hemi-seasons, solar-s-hemi-seasons):
+	Make into defcustoms.  (Bug#3429)
+
 2009-06-01  Chong Yidong  <cyd@stupidchicken.com>
 
 	* international/README: New file.
diff -r fd724c60cb3e -r e47b96db18de lisp/calendar/solar.el
--- a/lisp/calendar/solar.el	Thu Jun 04 03:13:28 2009 +0000
+++ b/lisp/calendar/solar.el	Thu Jun 04 06:40:13 2009 +0000
@@ -147,16 +147,27 @@
   :type 'number
   :group 'calendar)
 
-;;; End of user options.
-
-
-(defconst solar-n-hemi-seasons
+(defcustom solar-n-hemi-seasons
   '("Vernal Equinox" "Summer Solstice" "Autumnal Equinox" "Winter Solstice")
-  "List of season changes for the northern hemisphere.")
+  "List of season changes for the northern hemisphere."
+  :type '(list
+          (string :tag "Vernal Equinox")
+          (string :tag "Summer Solstice")
+          (string :tag "Autumnal Equinox")
+          (string :tag "Winter Solstice"))
+  :group 'calendar)
 
-(defconst solar-s-hemi-seasons
+(defcustom solar-s-hemi-seasons
   '("Autumnal Equinox" "Winter Solstice" "Vernal Equinox" "Summer Solstice")
-  "List of season changes for the southern hemisphere.")
+  "List of season changes for the southern hemisphere."
+  :type '(list
+          (string :tag "Autumnal Equinox")
+          (string :tag "Winter Solstice")
+          (string :tag "Vernal Equinox")
+          (string :tag "Summer Solstice"))
+  :group 'calendar)
+
+;;; End of user options.
 
 (defvar solar-sidereal-time-greenwich-midnight nil
   "Sidereal time at Greenwich at midnight (universal time).")