Skip to content

Commit

Permalink
changed accept-language variable name to wttrin-default-languages
Browse files Browse the repository at this point in the history
 the unwieldly wttrin-default-accept-language became the lighter-weight and more
 user-friendly wttrin-default-language
  • Loading branch information
cjennings committed Apr 22, 2024
1 parent cbb0717 commit fb56736
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions wttrin.el
Original file line number Diff line number Diff line change
Expand Up @@ -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)
Expand Down Expand Up @@ -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
Expand All @@ -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")
Expand Down

0 comments on commit fb56736

Please sign in to comment.