Refine meeting capture and calendar settings

1 files changed, 5 insertions, 6 deletions

diff --git a/config.org b/config.org
index 391e71e..d31c6e8 100644
--- a/config.org
+++ b/config.org
@@ -140,7 +140,10 @@ This section sets the visual defaults: theme, fonts, and frame behavior.
     ;; Enable 24-hour time display without load average.
     (setq display-time-24hr-format t
           display-time-day-and-date t
-          display-time-default-load-average nil)
+          display-time-default-load-average nil
+          calendar-latitude -37.7667
+          calendar-longitude 145.0
+          calendar-location-name "Melbourne, VIC")
     (display-time-mode 1))
 
   ;; Keep the theme's faces, but make the right edge alignment dynamic.
@@ -940,10 +943,6 @@ When CREATE is non-nil, create the datetree entry when missing."
       (widen)
       (ss/journal-goto-section section (ss/journal-capture-time)))
 
-    (defun ss/journal-meeting-heading ()
-      "Return the default heading for a journal meeting entry."
-      (format-time-string "%H:%M " (ss/journal-capture-time)))
-
     (defun ss/refresh-org-agenda-files (&rest _)
       "Refresh `org-agenda-files' from the journal and PARA directories.
   Ignore any arguments passed by advice wrappers."
@@ -1034,7 +1033,7 @@ compact, structured card file rather than turning into another capture target.
              "* %?")
             ("jm" "Meeting" entry
              (function (lambda () (ss/journal-capture-target "Meetings")))
-             "* %(ss/journal-meeting-heading)%?\n<%<%Y-%m-%d>>")
+             "* <%<%Y-%m-%d %H:%M>> %?")
             ("n" "Denote")
             ("nn" "Generic" plain
              (file denote-last-path)