Merge remote-tracking branch 'jinguk/master'

kjg/dot-cdist/manifest/init

@@ -0,0 +1,6 @@
+case "$__target_host" in
+    # Everybody has this
+    localhost)
+       __my_computer
+    ;;
+esac

kjg/dot-cdist/type/__my_computer/files/.emacs

@@ -0,0 +1,251 @@
+;; Added by Package.el.  This must come before configurations of
+;; installed packages.  Don't delete this line.  If you don't want it,
+;; just comment it out by adding a semicolon to the start of the line.
+;; You may delete these explanatory comments.
+(require 'package)
+(add-to-list 'package-archives
+             '("melpa" . "http://melpa.org/packages/") t)
+(add-to-list 'package-archives '("org" . "https://orgmode.org/elpa/") t)
+(package-initialize)
+
+
+
+(global-set-key (kbd "<f3>") (lambda () (interactive) (find-file (concat "~/ungleich-learning-circle/kjg/learning-"(system-name)"-"(format-time-string "%Y")".org"))))
+(global-set-key (kbd "C-x g") 'magit-status)
+(global-set-key (kbd "C-c a") 'org-agenda)
+(global-set-key (kbd "<f8>")  'org-todo-list)
+
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(epg-gpg-program "/usr/local/bin/gpg")
+ '(org-agenda-files
+   (quote
+    ("~/ungleich-learning-circle/kjg/todo.org" "~/learning.org")))
+ ;;'(org-directory (expand-file-name "~/ungleich-learning-circle/kjg/"))
+ '(package-selected-packages (quote (org org-gnome org-dp ## which-key magit)))
+ '(send-mail-function (quote sendmail-send-it)))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ )
+
+(require 'epa-file)
+
+(epa-file-enable)
+
+(setq mu4e-mu-binary "/usr/local/bin/mu")
+
+(add-to-list 'load-path "/usr/local/share/emacs/site-lisp/mu/mu4e")
+(require 'mu4e)
+
+(setq
+ mue4e-headers-skip-duplicates  t
+ mu4e-view-show-images t
+ mu4e-view-show-addresses t
+ mu4e-compose-format-flowed nil
+ mu4e-date-format "%y/%m/%d"
+ mu4e-headers-date-format "%Y/%m/%d"
+ mu4e-change-filenames-when-moving t
+ mu4e-attachments-dir "~/Downloads"
+
+ mu4e-maildir       "~/Maildir/ungleich"   ;; top-level Maildir
+ ;; note that these folders below must start with /
+ ;; the paths are relative to maildir root
+ mu4e-refile-folder "/Archive"
+ mu4e-sent-folder   "/Sent"
+ mu4e-drafts-folder "/Drafts"
+ mu4e-trash-folder  "/Trash"
+ mu4e-reply-to-address "jinguk.kwon@ungleich.ch"
+ user-mail-address "jinguk.kwon@ungleich.ch"
+ user-full-name  "kjg")
+
+;; this setting allows to re-sync and re-index mail
+;; by pressing U
+(setq mu4e-get-mail-command  "mbsync -a")
+
+(setq mail-host-address "mail.ungleich.ch")
+
+
+(setq send-mail-function   'smtpmail-send-it
+      message-send-mail-function 'smtpmail-send-it
+      user-mail-address "jinguk.kwon@ungleich.ch"
+      smtpmail-starttls-credentials '(("smtp.ungleich.ch" 587 nil nil))
+      smtpmail-auth-credentials "~/.authinfo.gpg"
+      smtpmail-default-smtp-server "smtp.ungleich.ch"
+      smtpmail-smtp-server "smtp.ungleich.ch"
+      smtpmail-smtp-service 587
+      smtpmail-smtp-user  "jinguk.kwon@ungleich.ch"
+      smtpmail-debug-info t
+      smtpmail-debug-verb t)
+      ;;starttls-extra-arguments nil
+      ;;starttls-gnutls-program (executable-find "gnutls-cli")
+      ;;smtpmail-warn-about-unknown-extensions t
+      ;;starttls-use-gnutls t)
+
+(require 'smtpmail)
+
+;;store org-mode links to messages
+(require 'org-mu4e)
+
+(define-key mu4e-headers-mode-map (kbd "C-c c") 'mu4e-org-store-and-capture)
+(define-key mu4e-view-mode-map    (kbd "C-c c") 'mu4e-org-store-and-capture)
+
+(setq org-directory (expand-file-name "~/ungleich-learning-circle/kjg/"))
+;;store link to message if in header view, not to header query
+(setq org-mu4e-link-query-in-headers-mode nil)
+
+(setq org-capture-templates
+      '(("t" "todo" entry (file+headline (lambda() (concat "~/ungleich-learning-circle/kjg/todo-"(system-name)"-"(format-time-string "%Y")".org")) "Tasks")
+                  "* TODO [#A] %?\nSCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))\n%a\n")))
+
+(setq org-log-done 'time)
+
+~
+❯ cd ungleich-learning-circle
+
+~/ungleich-learning-circle master*
+❯ cd kjg/dot-cdist
+
+~/ungleich-learning-circle/kjg/dot-cdist master*
+❯ ls -al
+total 0
+drwxr-xr-x  4 elf  staff  128 May  6 21:26 .
+drwxr-xr-x  8 elf  staff  256 May  6 22:03 ..
+drwxr-xr-x  3 elf  staff   96 May  6 21:33 manifest
+drwxr-xr-x  3 elf  staff   96 May  6 21:26 type
+
+~/ungleich-learning-circle/kjg/dot-cdist master*
+❯ cd type
+
+~/ungleich-learning-circle/kjg/dot-cdist/type master*
+❯ ls -al
+total 0
+drwxr-xr-x  3 elf  staff   96 May  6 21:26 .
+drwxr-xr-x  4 elf  staff  128 May  6 21:26 ..
+drwxr-xr-x  4 elf  staff  128 May  6 22:06 __my_computer
+
+~/ungleich-learning-circle/kjg/dot-cdist/type master*
+❯ cd __my_computer
+
+~/ungleich-learning-circle/kjg/dot-cdist/type/__my_computer master*
+❯ ls -al
+total 8
+drwxr-xr-x  4 elf  staff  128 May  6 22:06 .
+drwxr-xr-x  3 elf  staff   96 May  6 21:26 ..
+drwxr-xr-x  2 elf  staff   64 May  6 22:06 files
+-rw-r--r--  1 elf  staff  110 May  6 21:40 manifest
+
+~/ungleich-learning-circle/kjg/dot-cdist/type/__my_computer master*
+❯ cat ~/.emacs
+
+;; Added by Package.el.  This must come before configurations of
+;; installed packages.  Don't delete this line.  If you don't want it,
+;; just comment it out by adding a semicolon to the start of the line.
+;; You may delete these explanatory comments.
+(require 'package)
+(add-to-list 'package-archives
+             '("melpa" . "http://melpa.org/packages/") t)
+(add-to-list 'package-archives '("org" . "https://orgmode.org/elpa/") t)
+(package-initialize)
+
+
+
+(global-set-key (kbd "<f3>") (lambda () (interactive) (find-file (concat "~/ungleich-learning-circle/kjg/learning-"(system-name)"-"(format-time-string "%Y")".org"))))
+(global-set-key (kbd "C-x g") 'magit-status)
+(global-set-key (kbd "C-c a") 'org-agenda)
+(global-set-key (kbd "<f8>")  'org-todo-list)
+
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(epg-gpg-program "/usr/local/bin/gpg")
+ '(org-agenda-files
+   (quote
+    ("~/ungleich-learning-circle/kjg/todo.org" "~/learning.org")))
+ ;;'(org-directory (expand-file-name "~/ungleich-learning-circle/kjg/"))
+ '(package-selected-packages (quote (org org-gnome org-dp ## which-key magit)))
+ '(send-mail-function (quote sendmail-send-it)))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ )
+
+(require 'epa-file)
+
+(epa-file-enable)
+
+(setq mu4e-mu-binary "/usr/local/bin/mu")
+
+(add-to-list 'load-path "/usr/local/share/emacs/site-lisp/mu/mu4e")
+(require 'mu4e)
+
+(setq
+ mue4e-headers-skip-duplicates  t
+ mu4e-view-show-images t
+ mu4e-view-show-addresses t
+ mu4e-compose-format-flowed nil
+ mu4e-date-format "%y/%m/%d"
+ mu4e-headers-date-format "%Y/%m/%d"
+ mu4e-change-filenames-when-moving t
+ mu4e-attachments-dir "~/Downloads"
+
+ mu4e-maildir       "~/Maildir/ungleich"   ;; top-level Maildir
+ ;; note that these folders below must start with /
+ ;; the paths are relative to maildir root
+ mu4e-refile-folder "/Archive"
+ mu4e-sent-folder   "/Sent"
+ mu4e-drafts-folder "/Drafts"
+ mu4e-trash-folder  "/Trash"
+ mu4e-reply-to-address "jinguk.kwon@ungleich.ch"
+ user-mail-address "jinguk.kwon@ungleich.ch"
+ user-full-name  "kjg")
+
+;; this setting allows to re-sync and re-index mail
+;; by pressing U
+(setq mu4e-get-mail-command  "mbsync -a")
+
+(setq mail-host-address "mail.ungleich.ch")
+
+
+(setq send-mail-function   'smtpmail-send-it
+      message-send-mail-function 'smtpmail-send-it
+      user-mail-address "jinguk.kwon@ungleich.ch"
+      smtpmail-starttls-credentials '(("smtp.ungleich.ch" 587 nil nil))
+      smtpmail-auth-credentials "~/.authinfo.gpg"
+      smtpmail-default-smtp-server "smtp.ungleich.ch"
+      smtpmail-smtp-server "smtp.ungleich.ch"
+      smtpmail-smtp-service 587
+      smtpmail-smtp-user  "jinguk.kwon@ungleich.ch"
+      smtpmail-debug-info t
+      smtpmail-debug-verb t)
+      ;;starttls-extra-arguments nil
+      ;;starttls-gnutls-program (executable-find "gnutls-cli")
+      ;;smtpmail-warn-about-unknown-extensions t
+      ;;starttls-use-gnutls t)
+
+(require 'smtpmail)
+
+;;store org-mode links to messages
+(require 'org-mu4e)
+
+(define-key mu4e-headers-mode-map (kbd "C-c c") 'mu4e-org-store-and-capture)
+(define-key mu4e-view-mode-map    (kbd "C-c c") 'mu4e-org-store-and-capture)
+
+(setq org-directory (expand-file-name "~/ungleich-learning-circle/kjg/"))
+;;store link to message if in header view, not to header query
+(setq org-mu4e-link-query-in-headers-mode nil)
+
+(setq org-capture-templates
+      '(("t" "todo" entry (file+headline (lambda() (concat "~/ungleich-learning-circle/kjg/todo-"(system-name)"-"(format-time-string "%Y")".org")) "Tasks")
+                  "* TODO [#A] %?\nSCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))\n%a\n")))
+
+(setq org-log-done 'time)

kjg/dot-cdist/type/__my_computer/manifest

@@ -0,0 +1,9 @@
+#!/bin/sh
+
+pkgs="zsh mosh emacs nmap sipcalc"
+for pkg in ${pkgs}; do
+   __package ${pkg} --state present
+done
+
+require="__package/emacs" __file ~/.emacs \
+     --mode 0644 --source "$__type/files/.emacs"

kjg/todo-elfui-MacBook-Pro.local-2020.org

@@ -0,0 +1,4 @@
+* Tasks
+** TODO [#A] 
+   SCHEDULED: <2020-05-02 Sat>
+ [[mu4e:msgid:20200426002704.azrjjvoqhyhcsx4g@wolfsden.cz][Re: struggling with apk in unattended session]]

kjg/todo.org

@@ -24,4 +24,6 @@ test
 ** TODO [#A] 
    SCHEDULED: <2020-04-30 Thu>
  [[mu4e:msgid:rt-4.4.1-3+deb9u3-18825-1587474236-1715.9208-22-0@support.ungleich.ch][[support.ungleich.ch #9208] test]]
- 
+** TODO [#A] 
+   SCHEDULED: <2020-05-02 Sat>
+ [[mu4e:msgid:CABsR=fQwROqVUf+k5kBBQAAEDmyqnoVHMF9-L+S1mKYHjU8BNw@mail.gmail.com][awall difficulties]]