scip/dot-emacs
1
0
Fork 0
mirror of https://codeberg.org/scip/dot-emacs.git synced 2025-12-17 04:20:57 +01:00
Code Issues Packages Projects Releases Wiki Activity

revert last change, not needed, M-<left|right> already does the job

Browse Source
This commit is contained in:
Thomas von Dein
2023-06-15 11:34:44 +02:00
parent 48261f6c82
commit 842b2b22d4
1 changed files with 30 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
lisp/init-org.el
View File

@@ -192,8 +192,8 @@ down and unfold it, otherwise jump paragraph as usual."
(local-set-key (kbd "<C-down>") 'tvd-org-heading-down) (local-set-key (kbd "<C-down>") 'tvd-org-heading-down)
;; move word left or heading up, depending where point is ;; move word left or heading up, depending where point is
(local-set-key (kbd "<C-right>") 'tvd-org-demote-heading) ;; (local-set-key (kbd "<C-right>") 'tvd-org-demote-heading)
(local-set-key (kbd "<C-left>") 'tvd-org-promote-heading) ;; (local-set-key (kbd "<C-left>") 'tvd-org-promote-heading)
;; use nicer bullets ;; use nicer bullets
(when (fboundp 'org-bullets-mode) (when (fboundp 'org-bullets-mode)
@@ -218,15 +218,15 @@ down and unfold it, otherwise jump paragraph as usual."
(global-set-key (kbd "C-n") (lambda () (interactive) (org-capture))) (global-set-key (kbd "C-n") (lambda () (interactive) (org-capture)))
;; must be global since code edit sub buffers run their own major mode, not org ;; must be global since code edit sub buffers run their own major mode, not org
(global-set-key (kbd "C-c C-#") 'org-edit-src-exit) (global-set-key (kbd "C-c C-#") 'org-edit-src-exit))
;; some org mode vars must be set globally ;; some org mode vars must be set globally
(setq org-default-notes-file tvd-org-file (setq org-default-notes-file tvd-org-file
org-startup-indented t org-startup-indented t
org-indent-indentation-per-level 4) org-indent-indentation-per-level 4)
;; my own capture templates ;; my own capture templates
(setq org-capture-templates (setq org-capture-templates
'(("n" "Project" entry (file+headline tvd-org-file "Unsorted Tasks") '(("n" "Project" entry (file+headline tvd-org-file "Unsorted Tasks")
"* TODO %^{title}\n%u\n** Kostenstelle\n** Contact Peer\n** Contact Customer\n** Aufträge\n** Daten\n** Notizen\n %i%?\n" "* TODO %^{title}\n%u\n** Kostenstelle\n** Contact Peer\n** Contact Customer\n** Aufträge\n** Daten\n** Notizen\n %i%?\n"
:prepend t :jump-to-captured t) :prepend t :jump-to-captured t)
@@ -243,18 +243,18 @@ down and unfold it, otherwise jump paragraph as usual."
("c" "Copy/Paste" entry (file+headline tvd-org-file "Kurznotizen") ("c" "Copy/Paste" entry (file+headline tvd-org-file "Kurznotizen")
"* TODO %^{title}\n%u\n %x\n" :immediate-finish t :prepend t :jump-to-captured t))) "* TODO %^{title}\n%u\n %x\n" :immediate-finish t :prepend t :jump-to-captured t)))
;; follow links using eww, if present ;; follow links using eww, if present
;; (if (fboundp 'eww-browse-url) ;; (if (fboundp 'eww-browse-url)
;; (setq browse-url-browser-function 'eww-browse-url)) ;; (setq browse-url-browser-function 'eww-browse-url))
;; mark narrowing with an orange fringe, the advice for 'widen ;; mark narrowing with an orange fringe, the advice for 'widen
;; is in the outline section. ;; is in the outline section.
(advice-add 'org-narrow-to-subtree :after (advice-add 'org-narrow-to-subtree :after
'(lambda (&rest args) '(lambda (&rest args)
(set-face-attribute 'fringe nil :background tvd-fringe-narrow-bg))) (set-face-attribute 'fringe nil :background tvd-fringe-narrow-bg)))
;; I hate fundamental mode! ;; I hate fundamental mode!
(setq default-major-mode 'org-mode)) (setq default-major-mode 'org-mode)
(provide 'init-org) (provide 'init-org)