Updated azos-core, cladav sync, arch64 emulation

pkgs/elisp/azos-emacs-lauretta.org

@@ -128,6 +128,35 @@
     (kbd "n") 'azos/nixpkgs-search)
 #+end_src
 
+** CalDAV / Org Sync
+
+#+begin_src emacs-lisp
+(require 'org-caldav)
+
+(defvar azos/lauretta/nextcloud-user "aner"
+  "Nextcloud username for CalDAV sync.")
+
+(setq org-caldav-url "https://nextcloud.zakobar.com/remote.php/dav/calendars/1ddd03a6-4c2d-103c-9f7b-27b20313341d"
+      org-caldav-calendar-id "personal"
+      org-caldav-inbox "~/org/caldav-inbox.org"
+      org-caldav-files '("~/org/todo.org")
+      org-icalendar-timezone "Asia/Jerusalem")
+
+(defun azos/caldav-sync ()
+  "Sync org-caldav with Nextcloud calendar, reading password from pass."
+  (interactive)
+  (let* ((password (string-trim
+                    (shell-command-to-string
+                     (format "pass zakobar.com/users/%s" azos/lauretta/nextcloud-user))))
+         (url-http-real-basic-auth-storage
+          (list (list "nextcloud.zakobar.com:443"
+                      (cons azos/lauretta/nextcloud-user password)))))
+    (org-caldav-sync)))
+
+(define-key azos/global-minor-mode/open-keymap
+    (kbd "C") 'azos/caldav-sync)
+#+end_src
+
 * Provide
 
 #+begin_src emacs-lisp