Browse Source

replaced my/ with me/ in own functions

master
Marc 3 years ago
parent
commit
e679840b14
1 changed files with 11 additions and 11 deletions
  1. 22
      config.org

22
config.org

@ -325,7 +325,7 @@ Restore it to reasonable value after init. Also stop garbage collection during m
:END:
#+BEGIN_SRC emacs-lisp
(defun my/toggle-theme ()
(defun me/toggle-theme ()
(interactive)
(when (or *sys/windows* *sys/linux*)
(if (eq (car custom-enabled-themes) 'tango-dark)
@ -335,7 +335,7 @@ Restore it to reasonable value after init. Also stop garbage collection during m
(disable-theme 'tango)
(load-theme 'tango-dark)))))
(bind-key "C-c t" 'my/toggle-theme)
(bind-key "C-c t" 'me/toggle-theme)
#+END_SRC
Windows Theme:
@ -359,10 +359,10 @@ Windows Theme:
(visual-line-mode . adaptive-wrap-prefix-mode))
; :init
; (when (fboundp 'adaptive-wrap-prefix-mode)
; (defun my/activate-adaptive-wrap-prefix-mode ()
; (defun me/activate-adaptive-wrap-prefix-mode ()
; "Toggle `visual-line-mode' and `adaptive-wrap-prefix-mode' simultaneously."
; (adaptive-wrap-prefix-mode (if visual-line-mode 1 -1)))
; (add-hook 'visual-line-mode-hook 'my/activate-adaptive-wrap-prefix-mode)))
; (add-hook 'visual-line-mode-hook 'me/activate-adaptive-wrap-prefix-mode)))
#+END_SRC
** line numbers
@ -727,17 +727,17 @@ Uses default features of emacs instead of bringing a new framework in like helm
("<escape>" . company-abort))
:hook
(after-init . global-company-mode)
(emacs-lisp-mode . my/company-elisp)
(org-mode . my/company-org)
(emacs-lisp-mode . me/company-elisp)
(org-mode . me/company-org)
:config
(defun my/company-elisp ()
(defun me/company-elisp ()
(message "set up company for elisp")
(set (make-local-variable 'company-backends)
'(company-capf ;; capf needs to be before yasnippet, or lsp fucks up completion for elisp
company-yasnippet
company-dabbrev-code
company-files)))
(defun my/company-org ()
(defun me/company-org ()
(set (make-local-variable 'company-backends)
'(company-capf company-files))
;; (add-hook 'completion-at-point-functions 'pcomplete-completions-at-point nil t)
@ -794,7 +794,7 @@ Uses default features of emacs instead of bringing a new framework in like helm
; (add-hook 'org-src-mode-hook 'smartparens-mode)
; (add-hook 'org-mode-hook 'org-indent-mode)
:config
(defun my/org-company ()
(defun me/org-company ()
(set (make-local-variable 'company-backends)
'(company-capf company-files))
(add-hook 'completion-at-point-functions 'pcomplete-completions-at-point nil t)
@ -1507,11 +1507,11 @@ deactivate
:mode
("\\.beancount$" . beancount-mode)
:hook
(beancount-mode . my/beancount-company)
(beancount-mode . me/beancount-company)
:init
(add-hook 'beancount-mode-hook 'company/beancount-mode-hook)
:config
(defun my/beancount-company ()
(defun me/beancount-company ()
(set (make-local-variable 'company-backends)
'(company-beancount)))
(setq beancount-filename-main "/home/marc/Archiv/Finanzen/Transaktionen/transactions.beancount"))

Loading…
Cancel
Save