diff --git a/tzc.el b/tzc.el index d9bea7a..66d9f35 100644 --- a/tzc.el +++ b/tzc.el @@ -95,7 +95,7 @@ (defcustom tzc-favourite-time-zones-alist '(("Asia/Kolkata" "Kolkata") ("UTC+0000" "UTC") ("America/New_York" "New_York") - ("UK/London" "London") + ("Europe/London" "London") ("Europe/Berlin" "Berlin") ("Asia/Shanghai" "Shanghai") ("Asia/Tokyo" "Tokyo")) @@ -404,5 +404,15 @@ See `tzc-world-clock'." (align-regexp (point-min) (point-max) "\\(\\s-*\\) ")) (tzc-world-clock-mode)) +(defun tzc-check-time-zone (time-zone) + "Check info for TIME-ZONE." + (interactive "sEnter Time Zone: ") + (if (member time-zone (tzc--get-time-zones)) + (progn + (let* ((name (tzc--get-time-zone-label time-zone)) + (offset (tzc--get-offset time-zone))) + (message "%s %s" name offset))) + (message "%s is not a recognized time zone name." time-zone))) + (provide 'tzc) ;;; tzc.el ends here