diff options
author | Sacha Chua <sacha@sachachua.com> | 2023-09-03 15:51:06 -0400 |
---|---|---|
committer | Sacha Chua <sacha@sachachua.com> | 2023-09-03 15:51:06 -0400 |
commit | 7a4117a8eefd6bfb33a7a9be0f16acaacea68d3f (patch) | |
tree | f8baeb8d7da3e17f089f0af377bd4fe74c07f7f4 /emacsconf.el | |
parent | 46a027d939bf17c6f002c2a5b49cbf62e958c254 (diff) | |
download | emacsconf-el-7a4117a8eefd6bfb33a7a9be0f16acaacea68d3f.tar.xz emacsconf-el-7a4117a8eefd6bfb33a7a9be0f16acaacea68d3f.zip |
use :time instead of :duration?
Diffstat (limited to 'emacsconf.el')
-rw-r--r-- | emacsconf.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/emacsconf.el b/emacsconf.el index 46c2b0c..a9d6874 100644 --- a/emacsconf.el +++ b/emacsconf.el @@ -392,7 +392,6 @@ (:public-email "PUBLIC_EMAIL") (:emergency "EMERGENCY") (:buffer "BUFFER") - (:duration "TIME") (:min-time "MIN_TIME") (:max-time "MAX_TIME") (:availability "AVAILABILITY") @@ -623,7 +622,7 @@ (unless (or (null (plist-get o :status)) (null (plist-get o :email)) (string= (plist-get o :status) "CANCELLED") - (string-match "after" (plist-get o :q-and-a))) + (string-match "after" (or (plist-get o :q-and-a) ""))) (if (null (plist-get o :video-file)) (progn (plist-put o :live-time (plist-get o :start-time)) @@ -920,9 +919,9 @@ (kill-new (format "%d captioned (%d minutes), %d received and waiting to be captioned (%d minutes)" (length (emacsconf-collect-field-for-status "CAPTIONED" :title)) - (apply '+ (seq-map 'string-to-number (conf-collect-field-for-status "CAPTIONED" :duration))) + (apply '+ (seq-map 'string-to-number (conf-collect-field-for-status "CAPTIONED" :time))) (length (emacsconf-collect-field-for-status "PREREC_RECEIVED" :title)) - (apply '+ (seq-map 'string-to-number (conf-collect-field-for-status "PREREC_RECEIVED" :duration))))))) + (apply '+ (seq-map 'string-to-number (conf-collect-field-for-status "PREREC_RECEIVED" :time))))))) ;; Timezones (defvar emacsconf-date "2022-12-03" "Starting date of EmacsConf.") |