branch: externals/excorporate commit 18e4eadb02cf9d5aabb791c2c43c9a8187febe32 Author: Thomas Fitzsimmons <fitz...@fitzsim.org> Commit: Thomas Fitzsimmons <fitz...@fitzsim.org>
excorporate-time-zones.el: Silence compiler warnings * excorporate-time-zones.el: Shorten description and fix lexical-binding directive typo. (exco--time-zone-olson-to-server): Shorten docstring. (exco--time-zone-emacs-to-olson): Fix and shorten docstring. --- NEWS | 2 ++ README | 2 ++ excorporate-time-zones.el | 18 +++++++++--------- 3 files changed, 13 insertions(+), 9 deletions(-) diff --git a/NEWS b/NEWS index 13f3a5a617..c1a3ffe09a 100644 --- a/NEWS +++ b/NEWS @@ -1,5 +1,7 @@ GNU Emacs Excorporate NEWS -- history of user-visible changes. +** Eliminate excorporate-time-zones.el compiler warnings + ** Improve quick start documentation ** Eliminate a warning issued by newer versions of Org Mode diff --git a/README b/README index 0cefba2075..6a0920cb99 100644 --- a/README +++ b/README @@ -3,6 +3,8 @@ Excorporate provides Exchange integration for Emacs. Most Recent Improvements ------------------------ +** Eliminate excorporate-time-zones.el compiler warnings + ** Improve quick start documentation ** Eliminate a warning issued by newer versions of Org Mode diff --git a/excorporate-time-zones.el b/excorporate-time-zones.el index 7a3c8b526b..89390de4a5 100644 --- a/excorporate-time-zones.el +++ b/excorporate-time-zones.el @@ -1,4 +1,4 @@ -;;; excorporate-time-zones.el --- time zone conversion *- lexical-binding: t -*- +;;; excorporate-time-zones.el --- IANA time zones -*- lexical-binding: t -*- ;; Copyright (C) 2021 Free Software Foundation, Inc. @@ -20,8 +20,9 @@ ;;; Commentary: -;; Hash tables and functions that map (current-time-zone) values to -;; time zone names recognized by Exchange servers. +;; Hash tables and functions that map `current-time-zone' values to +;; IANA (sometimes referred to as Olson) time zone names recognized by +;; Exchange servers. ;; For example: ;; (current-time-zone) => (-14400 "EDT") @@ -55,7 +56,7 @@ ;; (dolist (name names) ;; (puthash name zone table))))) ;; (format "%S" table))) -;; " \"A hash table mapping IANA/Olson time zone" +;; " \"A hash table mapping IANA time zone" ;; " names to server time zone names.\")")) (defvar exco--time-zone-olson-to-server @@ -524,7 +525,7 @@ "Pacific/Apia" "Samoa Standard Time" "Pacific/Kiritimati" "Line Islands Standard Time" "Etc/GMT-14" "Line Islands Standard Time")) - "A hash table mapping IANA/Olson time zone names to server time zone names.") + "A hash table mapping IANA time zone names to server time zone names.") ;; Generated with: ;;(defun zdump-line-to-current-time-zone-value () @@ -581,8 +582,8 @@ ;; (puthash key (cons value values) table)) ;; (puthash key (list value) table)))))) ;; (format "%S" table)) -;; "(concat \"A hash table mapping `current-time-zone' values to\" -;; \" IANA/Olson time zone names.\")")) +;; " \"A hash table mapping `current-time-zone' values to" +;; " IANA time zone names.\")")) ;; `exco-time-zone' only uses one of these, but I thought knowing this ;; mapping might be generally useful. @@ -832,8 +833,7 @@ (+46800 "NZDT") ("Pacific/Auckland") (+49500 "+1345") ("Pacific/Chatham") (+50400 "+14") ("Etc/GMT-14" "Pacific/Kiritimati" "Pacific/Apia"))) - (concat "A hash table mapping `current-time-zone' values to" - " IANA/Olson time zone names.")) + "A hash table mapping `current-time-zone' values to IANA time zone names.") (defcustom excorporate-time-zone nil "The server-style time zone.