This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun -apply-window-configuration (conf window) | |
(defun -split-to-windows (conf window) | |
(if (null conf) | |
nil | |
(let* ((this-split (car conf)) | |
(new-window | |
(cond ((eq (car this-split) 'column) | |
(split-window-right nil window)) | |
((eq (car this-split) 'row) | |
(split-window-below nil window)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun my/org-link-heading-here (cand) | |
(when-let ((marker (get-text-property 0 'consult--candidate cand))) | |
(save-excursion | |
(with-current-buffer (marker-buffer marker) | |
(goto-char marker) | |
(org-store-link nil t))) | |
(org-insert-all-links 1 "" " "))) | |
(defvar-keymap embark-consult-org-heading-map | |
:doc "Keymap for operating on org headings" | |
:parent embark-general-map |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/zsh | |
# include this file in your shell config | |
autoload -Uz add-zsh-hook | |
# this file comes from installing https://github.com/romkatv/gitstatus | |
SOURCE "${HOMEBREW_PREFIX:-/usr/local}/opt/gitstatus/gitstatus.plugin.zsh" || return | |
gitstatusd_instance='GSD' | |
# the following are a mystery - why do they define the fn names with $1? |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
"modaledit.keybindings": { | |
"\n": [ | |
"lineBreakInsert", | |
{ | |
"command": "modaledit.typeNormalKeys", | |
"args": { | |
"keys": "ku" | |
} | |
} | |
], |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; Provided by Sebastian Urban | |
;; More information at https://idiocy.org/emacs-fonts-and-fontsets.html | |
(set-fontset-font "fontset-default" 'adlam "Noto Sans Adlam") | |
(set-fontset-font "fontset-default" 'anatolian "Noto Sans Anatolian Hieroglyphs") | |
(set-fontset-font "fontset-default" 'arabic "Noto Sans Arabic") | |
(set-fontset-font "fontset-default" 'aramaic "Noto Sans Imperial Aramaic Regular") | |
(set-fontset-font "fontset-default" 'armenian "Noto Sans Armenian") | |
(set-fontset-font "fontset-default" 'avestan "Noto Sans Avestan") | |
(set-fontset-font "fontset-default" 'balinese "Noto Sans Balinese") |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; org-archive-subtree-hierarchical.el | |
;; | |
;; version 0.2 | |
;; modified from https://lists.gnu.org/archive/html/emacs-orgmode/2014-08/msg00109.html | |
;; modified from https://stackoverflow.com/a/35475878/259187 | |
;; In orgmode | |
;; * A | |
;; ** AA | |
;; *** AAA |