summaryrefslogtreecommitdiffstats
path: root/emacsconf.el
diff options
context:
space:
mode:
authorSacha Chua <sacha@sachachua.com>2023-09-03 15:51:06 -0400
committerSacha Chua <sacha@sachachua.com>2023-09-03 15:51:06 -0400
commit7a4117a8eefd6bfb33a7a9be0f16acaacea68d3f (patch)
treef8baeb8d7da3e17f089f0af377bd4fe74c07f7f4 /emacsconf.el
parent46a027d939bf17c6f002c2a5b49cbf62e958c254 (diff)
downloademacsconf-el-7a4117a8eefd6bfb33a7a9be0f16acaacea68d3f.tar.xz
emacsconf-el-7a4117a8eefd6bfb33a7a9be0f16acaacea68d3f.zip
use :time instead of :duration?
Diffstat (limited to 'emacsconf.el')
-rw-r--r--emacsconf.el7
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.")