diff options
| author | Sacha Chua <sacha@sachachua.com> | 2023-11-07 08:57:17 -0500 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2023-11-07 08:57:17 -0500 |
| commit | 6be712dedf761812f351522b5e1035491b403958 (patch) | |
| tree | 6b5980d102c39f2bf2c050be8245a41a20d78322 | |
| parent | ddc9d9ec2a8c9f702179f98eeeb0757cf042132d (diff) | |
| download | emacsconf-el-6be712dedf761812f351522b5e1035491b403958.tar.xz emacsconf-el-6be712dedf761812f351522b5e1035491b403958.zip | |
fix end of timezone string
Diffstat (limited to '')
| -rw-r--r-- | emacsconf.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/emacsconf.el b/emacsconf.el index 485ba4d..f5dd1cb 100644 --- a/emacsconf.el +++ b/emacsconf.el @@ -1083,9 +1083,8 @@ The subheading should match `emacsconf-abstract-heading-regexp'." "Timezone offset for `emacsconf-timezone' on `emacsconf-date'.") (defun emacsconf-timezone-string (o tz) - (let* ((timestamp (org-timestamp-from-string (plist-get o :scheduled))) - (start (org-timestamp-to-time (org-timestamp-split-range timestamp))) - (end (org-timestamp-to-time (org-timestamp-split-range timestamp t)))) + (let* ((start (org-timestamp-to-time (org-timestamp-split-range (org-timestamp-from-string (plist-get o :scheduled))))) + (end (org-timestamp-to-time (org-timestamp-split-range (org-timestamp-from-string (plist-get o :scheduled)) t)))) (if (string= tz "UTC") (format "%s - %s " (format-time-string "%A, %b %-e %Y, ~%-l:%M %p" |