madmaurice/configfiles
1
1
Fork 0
Code Issues Pull requests Releases Wiki Activity

Mehr emacs gebastel

Browse source
This commit is contained in:
madmaurice 2017-05-16 00:48:57 +02:00
parent 3e6267e659
commit bd4026de0f
1 changed files with 27 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

44
emacs/.emacs
View file

@ -76,28 +76,38 @@
(defun term-split () (defun term-split ()
"creates terminal window below" "creates terminal window below"
(interactive) (interactive)
(select-window (split-window-below -7)) (let (window (split-window-below -7))
(term "/bin/zsh")) (select-window window)
(term "/bin/zsh")
(set-window-dedicated-p window t)))
(global-set-key (kbd "C-x t") 'term-split) (global-set-key (kbd "C-x t") 'term-split)
;; Kill term buffer on exit ;; Kill term buffer on exit
;; (defun term-handle-exit--close-buffer (&rest args) ;(defun term-handle-exit--close-buffer (&rest args)
;; (when (null (get-buffer-process (current-buffer))) ; (when (null (get-buffer-process (current-buffer)))
;; (kill-buffer (current-buffer)))) ; (progn
;; ; (let (window (get-buffer-window (current-buffer))
;; (advice-add 'term-handle-exit :after #'term-handle-exit--close-buffer) ; (when (window-dedicated-p ))
; (kill-buffer (current-buffer))
; Fix...
;; Latex german ; (advice-add 'term-handle-exit :after #'term-handle-exit--close-buffer)
;; (defun latex-german-umlauts ()
;; "Sets keys like ä to write \"a" ; Latex german
;; (message "Latex German Umlauts loaded.") (defun evil-is-insert () (string= evil-state "insert"))
;; (defun local-map (key ins) (defun latex-german-umlauts ()
;; (local-set-key (kbd key) (lambda () (interactive) `(insert v)))) "Sets keys like ä to write \"a"
;; (local-map "ä" "\"a")) (message "Latex German Umlauts loaded.")
;; ;;(local-set-key (kbd "ä") (lambda () (interactive) (insert "\"a"))) (local-set-key (kbd "ä") (lambda () (interactive) (when (evil-is-insert) (insert "\"a"))))
;; (local-set-key (kbd "ö") (lambda () (interactive) (when (evil-is-insert) (insert "\"o"))))
;; (add-hook 'latex-mode-hook 'latex-german-umlauts) (local-set-key (kbd "ü") (lambda () (interactive) (when (evil-is-insert) (insert "\"u"))))
(local-set-key (kbd "Ä") (lambda () (interactive) (when (evil-is-insert) (insert "\"A"))))
(local-set-key (kbd "Ö") (lambda () (interactive) (when (evil-is-insert) (insert "\"O"))))
(local-set-key (kbd "Ü") (lambda () (interactive) (when (evil-is-insert) (insert "\"U"))))
(local-set-key (kbd "ß") (lambda () (interactive) (when (evil-is-insert) (insert "\"s")))))
(add-hook 'latex-mode-hook 'latex-german-umlauts)
;; Split windows horizontally preferred ;; Split windows horizontally preferred
(setq split-height-threshold 6) (setq split-height-threshold 6)