diff options
Diffstat (limited to '')
| -rw-r--r-- | 2024/organizers-notebook/index.org | 89 |
1 files changed, 87 insertions, 2 deletions
diff --git a/2024/organizers-notebook/index.org b/2024/organizers-notebook/index.org index 74d15746..167796f4 100644 --- a/2024/organizers-notebook/index.org +++ b/2024/organizers-notebook/index.org @@ -130,7 +130,8 @@ interests you! :PROPERTIES: :CUSTOM_ID: phases :END: -** TODO Draft CFP +** DONE Draft CFP +CLOSED: [2024-09-17 Tue 16:45] :PROPERTIES: :CUSTOM_ID: cfp :END: @@ -146,5 +147,89 @@ CLOSED: [2024-06-11 Tue 19:21] DEADLINE: <2024-06-14 Fri> :PROPERTIES: :CREATED: [024-06-03 Mon 10:1] :END: -**** TODO Post CFP in the usual places +**** DONE Post CFP in the usual places +CLOSED: [2024-09-17 Tue 16:45] emacsconf-discuss, reddit.com/r/emacs, Emacs News, emacs-tangents, Mastodon, X +** Draft schedule +:PROPERTIES: +:CUSTOM_ID: draft-schedule +:END: + +#+NAME: schedule +#+begin_src emacs-lisp :results value replace :exports none :eval never-export +(require 'emacsconf) +(require 'emacsconf-schedule) +(setq emacsconf-schedule-tracks + '((:label "Saturday" + :start "2024-12-07 9:00" + :end "2024-12-07 18:00" + :tracks ("General")) + (:label "Sunday" + :start "2024-12-08 9:00" + :end "2024-12-08 18:00" + :tracks ("General")))) +(let ((emacsconf-schedule-default-buffer-minutes 15) + (emacsconf-schedule-default-buffer-minutes-for-live-q-and-a 20) + (emacsconf-schedule-break-time 10) + (emacsconf-schedule-lunch-time 60) + (emacsconf-use-absolute-url t) + (emacsconf-schedule-strategies '(emacsconf-schedule-allocate-buffer-time + emacsconf-schedule-copy-previous-track)) + (emacsconf-schedule-validation-functions + '(emacsconf-schedule-validate-time-constraints + ;; emacsconf-schedule-validate-live-q-and-a-sessions-are-staggered + emacsconf-schedule-validate-all-talks-present + emacsconf-schedule-validate-no-duplicates))) + (setq emacsconf-schedule-plan + '(("GEN Saturday, Dec 7" :start "2024-12-07 09:00" :set-track "General") + sat-open + emacs30 ; probably any + project ; any + org-teach ; any + hyperdrive ; >= 11:00 Sat + (lunch :start "12:00") + theme ; >= 12:30 + water ; >= 13:00 Sat, same speaker as shell + shell ; >= 13:00 Sat + literate ; >= 13:00 + writing ; >= 15:30 Sat + rust ; Dec 7 + sat-close + ("GEN Sunday, Dec 8" :start "2024-12-08 09:00" :set-track "General") + sun-open + flp ; any + graph ; <= 12:00 + gypsum ; <= 11:00 + p-search ; any + pgmacs ; <= 15:00 + (lunch :start "12:00") + learning ; any + sharing ; any, same speaker as learning + casual ; >= 13:00 + blee ; any + julia ; >= 13:00 + (transducers :start "16:00") ; >= 16:00 sun + (sun-close :start "16:50") + )) + (setq emacsconf-schedule-draft (emacsconf-schedule-prepare (emacsconf-schedule-inflate-sexp emacsconf-schedule-plan))) + (prog1 (string-join (emacsconf-schedule-validate emacsconf-schedule-draft) "\n") + (let ((emacsconf-schedule-svg-modify-functions + '(emacsconf-schedule-svg-color-by-availability + ;emacsconf-schedule-svg-color-by-status + ))) + (with-temp-file (expand-file-name "schedule.svg" (file-name-directory emacsconf-org-file)) + (svg-print (emacsconf-schedule-svg 800 300 emacsconf-schedule-draft))) + (with-temp-file (expand-file-name "schedule.svg" (expand-file-name "organizers-notebook" (expand-file-name emacsconf-year emacsconf-directory))) + (svg-print (emacsconf-schedule-svg 800 300 emacsconf-schedule-draft)))) + (clear-image-cache))) +#+end_src + +#+RESULTS: schedule +:results: +:end: + +[[my-include:schedule.svg?wrap=export html]] + +Coloring by availability: +- light blue: constraint is <= a time +- peach: constraint is >= a time |