seven-languages-in-seven-weeks/announcements.org
Correl Roush ff51710879 Don't upcase the language name
Because... Io.
2015-06-09 14:00:15 -04:00

80 lines
3.3 KiB
Org Mode

#+TITLE: Extreme Tech Seminar
#+AUTHOR: Correl Roush
#+EMAIL: correl@gmail.com
#+OPTIONS: H:1 toc:nil ^:nil
#+STARTUP: beamer indent
#+COLUMNS: %45ITEM %10BEAMER_env(Env) %10BEAMER_act(Act) %4BEAMER_col(Col) %8BEAMER_opt(Opt)
#+PROPERTY: BEAMER_col_ALL 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9 0.0 :ETC
#+LaTeX_CLASS: beamer
#+LaTeX_CLASS_OPTIONS: [presentation,aspectratio=169]
#+begin_src emacs-lisp :exports results :results silent
(defun xts-announcement (location language)
(print (string-join `("#+LATEX: \\fontspec{Antonio-Bold}\\color{trek@lightyellow}"
"#+LATEX: \\Huge"
"#+BEGIN_CENTER"
"THE EXTREME TECH SEMINAR"
"#+END_CENTER"
"#+LATEX: \\Large\\color{trek@lightorange}"
"#+BEGIN_CENTER"
,(format-time-string "%a, %B %e @%l:%M%p"
(org-get-scheduled-time (point)))
"#+END_CENTER"
"#+LATEX: \\normalsize\\color{trek@lightblue}"
"#+BEGIN_CENTER"
"Come join us as we study Bruce Tate's book, \"Seven Languages in Seven Weeks: A Pragmatic Guide to Learning Programming Languages\"."
"#+END_CENTER"
"#+LATEX: \\small\\color{trek@darkorange}"
"#+BEGIN_CENTER"
,(concat "THIS WEEK: " language)
"#+END_CENTER"
"#+LATEX: \\small\\color{trek@midblue}"
"#+BEGIN_CENTER"
"pragprog.com/book/btlang\\\\"
"COUPON CODE: ExtremeTech7"
"#+END_CENTER")
"\n")))
#+end_src
* Ruby
SCHEDULED: <2015-05-27 Wed 18:00-20:00>
#+begin_src emacs-lisp :exports results :results raw
(xts-announcement "Franklin Training Room"
"The object-oriented langauge, \"Ruby\"")
#+end_src
* Io
SCHEDULED: <2015-06-10 Wed 18:00-20:00>
#+begin_src emacs-lisp :exports results :results raw
(xts-announcement "Franklin Training Room"
"The prototype language, \"Io\"")
#+end_src
* Prolog
SCHEDULED: <2015-06-24 Wed 18:00-20:00>
#+begin_src emacs-lisp :exports results :results raw
(xts-announcement "Franklin Training Room"
"The logic programming language, \"Prolog\"")
#+end_src
* Scala
SCHEDULED: <2015-07-08 Wed 18:00-20:00>
#+begin_src emacs-lisp :exports results :results raw
(xts-announcement "Franklin Training Room"
"The functional/object-oriented hybrid JVM language, \"Scala\"")
#+end_src
* Erlang
SCHEDULED: <2015-07-22 Wed 18:00-20:00>
#+begin_src emacs-lisp :exports results :results raw
(xts-announcement "Franklin Training Room"
"The concurrent, functional language, \"Erlang\"")
#+end_src
* Closure
SCHEDULED: <2015-08-05 Wed 18:00-20:00>
#+begin_src emacs-lisp :exports results :results raw
(xts-announcement "Franklin Training Room"
"The JVM lisp, \"Closure\"")
#+end_src
* Haskell
SCHEDULED: <2015-08-19 Wed 18:00-20:00>
#+begin_src emacs-lisp :exports results :results raw
(xts-announcement "Franklin Training Room"
"The pure functional language \"Haskell\"")
#+end_src