From d3505dad7096d0c545467a045ae267e1ed63e8b6 Mon Sep 17 00:00:00 2001
From: Correl Roush <croush@coredial.com>
Date: Fri, 12 Jun 2015 16:29:33 -0400
Subject: [PATCH] Add food to the announcements

---
 announcements.org | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/announcements.org b/announcements.org
index 7abeb5e..3c092af 100644
--- a/announcements.org
+++ b/announcements.org
@@ -31,7 +31,11 @@
                           "#+LATEX: \\small\\color{trek@midblue}"
                           "#+BEGIN_CENTER"
                           "pragprog.com/book/btlang\\\\"
-                          "COUPON CODE: ExtremeTech7"
+                          "COUPON CODE: ExtremeTech7\\\\"
+                          "#+END_CENTER"
+                          "#+LATEX: \\footnotesize\\color{trek@darkpurple}"
+                          "#+BEGIN_CENTER"
+                          "FOOD WILL BE PROVIDED"
                           "#+END_CENTER")
                         "\n")))
 #+end_src
@@ -54,6 +58,19 @@ SCHEDULED: <2015-06-24 Wed 18:00-20:00>
   (xts-announcement "Franklin Training Room"
                     "The logic programming language, \"Prolog\"")
 #+end_src
+#+begin_src emacs-lisp :results code
+  (let ((scheduled (concat "<" (org-entry-get (point) "SCHEDULED") ">")))
+    (string-match org-ts-regexp1 scheduled)
+    (match-string 20 scheduled)
+    (s-match-strings-all org-ts-regexp1 scheduled)
+    ;;(org-parse-time-string (match-string 2))
+    )
+#+end_src
+
+#+RESULTS:
+#+BEGIN_SRC emacs-lisp
+(("2015-06-24 Wed 18:00" "2015-06-24 Wed 18:00" "2015" "06" "24" "Wed" " 18:00" "18" "00"))
+#+END_SRC
 * Scala
 SCHEDULED: <2015-07-08 Wed 18:00-20:00>
 #+begin_src emacs-lisp :exports results :results raw