From fb56736b9034b9a25a372fb981e875fd0e51e77d Mon Sep 17 00:00:00 2001
From: Craig Jennings <c@cjennings.net>
Date: Mon, 22 Apr 2024 11:28:38 -0500
Subject: changed accept-language variable name to wttrin-default-languages

 the unwieldly wttrin-default-accept-language became the lighter-weight and more
 user-friendly wttrin-default-language
---
 wttrin.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/wttrin.el b/wttrin.el
index 1622eaf..c8ad655 100644
--- a/wttrin.el
+++ b/wttrin.el
@@ -42,7 +42,7 @@
   :prefix "wttrin-"
   :group 'comm)
 
-(defcustom wttrin-font-name "Lucida Console"
+(defcustom wttrin-font-name "Liberation Mono"
   "Preferred monospaced font name for weather display."
   :group 'wttrin
   :type 'string)
@@ -73,7 +73,7 @@
   :group 'wttrin
   :type '(repeat string))
 
-(defcustom wttrin-default-accept-language
+(defcustom wttrin-default-languages
   '("Accept-Language" . "en-US,en;q=0.8,zh-CN;q=0.6,zh;q=0.4")
   "Specify default HTTP request Header for Accept-Language."
   :group 'wttrin
@@ -93,7 +93,7 @@ units (default)."
 (defun wttrin-fetch-raw-string (query)
   "Get the weather information based on your QUERY."
   (let ((url-user-agent "curl"))
-    (add-to-list 'url-request-extra-headers wttrin-default-accept-language)
+	(add-to-list 'url-request-extra-headers wttrin-default-languages)
     (with-current-buffer
         (url-retrieve-synchronously
          (concat "http://wttr.in/" query "?A")
-- 
cgit v1.2.3