branch: externals/excorporate
commit b3c028f737dbb0f1c666f5d118475c9504565e84
Author: Thomas Fitzsimmons <fitz...@fitzsim.org>
Commit: Thomas Fitzsimmons <fitz...@fitzsim.org>
Do not allow empty string as custom time zone
* excorporate-time-zones.el (excorporate-customize-time-zone):
Detect blank result from completing-read.
---
excorporate-time-zones.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/excorporate-time-zones.el b/excorporate-time-zones.el
index 0a2cd80..3c9b53f 100644
--- a/excorporate-time-zones.el
+++ b/excorporate-time-zones.el
@@ -841,8 +841,9 @@
(cons "Emacs Built-in"
(hash-table-values exco--time-zone-olson-to-server))
nil t)))
- (customize-save-variable 'excorporate-time-zone
- (if (equal zone "Emacs Built-in") nil zone))))
+ (unless (equal zone "")
+ (customize-save-variable 'excorporate-time-zone
+ (if (equal zone "Emacs Built-in") nil zone)))))
(defun exco-time-zone (&optional emacs-time-zone)
"Return server style time zone string.
