A number of various updates, some cool, most boring.
[syinit] / 11-cal.el
index 82ab0d7..d31b7a1 100644 (file)
--- a/11-cal.el
+++ b/11-cal.el
@@ -5,7 +5,7 @@
 ;;     Author: Steve Youngs <steve@sxemacs.org>
 ;; Maintainer: Steve Youngs <steve@sxemacs.org>
 ;;    Created: <2007-12-02>
-;; Time-stamp: <Thursday Apr  9, 2020 08:12:34 steve>
+;; Time-stamp: <Saturday 10 Apr 2021 10:24:55 (steve)>
 ;;   Download: <https://downloads.sxemacs.org/SYinits>
 ;;   HTMLised: <https://www.sxemacs.org/SYinits/11-cal.html>
 ;;   Git Repo: git clone https://git.sxemacs.org/syinit
@@ -62,9 +62,9 @@
 (require 'diary-lib)
 ;(require 'calendar)
 (setq 
- calendar-latitude -27.47
- calendar-longitude 153.02
- calendar-location-name "Brisbane"
+ calendar-latitude [27 35.33 south]
+ calendar-longitude [153 7.29 east]
+ calendar-location-name "Rochedale South"
  calendar-time-zone 600
  cal-tex-diary t
 ; calendar-date-display-form ; see: "Howm Integration" below
@@ -614,8 +614,6 @@ Ever-so-slightly modified to include the Easter Monday holiday."
 (define-key ctl-x-map "tu" 'timeclock-update-modeline)
 (define-key ctl-x-map "tw" 'timeclock-when-to-leave-string)
 
-
-
 ;:*=======================
 ;:* Start itimer to refresh just after midnight
 ;; This needs my `future-run-at-time' advice.
@@ -628,6 +626,10 @@ Ever-so-slightly modified to include the Easter Monday holiday."
   (mark-calendar-holidays)
   (diary-show-all-entries))
 
-(add-hook 'calendar-load-hook 'sy-calendar-setup)
+(add-hook 'calendar-load-hook #'sy-calendar-setup)
+;:*=======================
+;:* Appropriate keybinding
+(and (not (sawfish-running-p))
+     (global-set-key [XF86Calendar] #'calendar))
 ;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::*
 (message "Calendar settings loaded")