janek
/
dotfiles
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

config: improve org id default and remove bash_aliases error

This commit is contained in:
xeruf 2022-06-01 15:01:07 +02:00
parent ef61b8f79f
commit 11720e3a27
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
.bash_aliases
View File

@ -1,3 +1,5 @@
test -n "$PS1" || return 0
export LESS="--RAW-CONTROL-CHARS --ignore-case --LONG-PROMPT --jump-target=5 $(test $(less --version | head -1 | cut -f2 -d' ') -ge 590 && echo --incsearch)" export LESS="--RAW-CONTROL-CHARS --ignore-case --LONG-PROMPT --jump-target=5 $(test $(less --version | head -1 | cut -f2 -d' ') -ge 590 && echo --incsearch)"
bind '"\ek":history-search-backward' bind '"\ek":history-search-backward'
bind '"\ej":history-search-forward' bind '"\ej":history-search-forward'

5
.config/doom/config.el
View File

@ -228,7 +228,7 @@ Version 2019-11-04 2021-02-16"
:config :config
; the value does not matter, see https://emacs.stackexchange.com/questions/71774/pass-default-value-to-org-set-property/71777#71777 ; the value does not matter, see https://emacs.stackexchange.com/questions/71774/pass-default-value-to-org-set-property/71777#71777
(add-to-list 'org-global-properties-fixed '("ID_ALL" . "id")) ;(add-to-list 'org-global-properties-fixed '("ID_ALL" . "id"))
(map! :map org-mode-map (map! :map org-mode-map
:leader :leader
"\\" 'org-ctrl-c-ctrl-c "\\" 'org-ctrl-c-ctrl-c
@ -247,7 +247,8 @@ Version 2019-11-04 2021-02-16"
"lk" 'counsel-org-link "lk" 'counsel-org-link
"gR" 'org-mode-restart "gR" 'org-mode-restart
:desc "Set ID property" "lI" (lambda () (interactive) (org-set-property "ID" :desc "Set ID property" "lI" (lambda () (interactive) (org-set-property "ID"
(org-read-property-value "ID" nil (downcase (s-replace-regexp "[^[:alnum:][:digit:]]\+" "-" (org-get-heading t t t t)))))) (let ((heading (org-get-heading t t t t)))
(if heading (org-read-property-value "ID" nil (downcase (s-replace-regexp "[^[:alnum:][:digit:]]\+" "-" (heading)))) (file-name-sans-extension (file-name-nondirectory buffer-file-name))))))
:desc "Set Roam Aliases" "la" (lambda () (interactive) (org-set-property "ROAM_ALIASES" nil)) :desc "Set Roam Aliases" "la" (lambda () (interactive) (org-set-property "ROAM_ALIASES" nil))
:desc "Add tag" "mt" 'org-roam-tag-add :desc "Add tag" "mt" 'org-roam-tag-add
:desc "Remove tag" "mT" 'org-roam-tag-remove :desc "Remove tag" "mT" 'org-roam-tag-remove