Exit prompt attempt
This commit is contained in:
parent
5fad0abd17
commit
ec8fbec3c4
1 changed files with 16 additions and 1 deletions
17
emacs/.emacs
17
emacs/.emacs
|
@ -166,7 +166,6 @@
|
||||||
(evil-define-key 'normal neotree-mode-map (kbd "RET") 'neotree-enter)
|
(evil-define-key 'normal neotree-mode-map (kbd "RET") 'neotree-enter)
|
||||||
(evil-define-key 'normal neotree-mode-map (kbd "q") 'neotree-hide))
|
(evil-define-key 'normal neotree-mode-map (kbd "q") 'neotree-hide))
|
||||||
|
|
||||||
|
|
||||||
;; Cursor centered
|
;; Cursor centered
|
||||||
(use-package centered-cursor-mode
|
(use-package centered-cursor-mode
|
||||||
:ensure t
|
:ensure t
|
||||||
|
@ -257,6 +256,22 @@
|
||||||
|
|
||||||
(global-set-key (kbd "<C-tab>") 'cycle-window)
|
(global-set-key (kbd "<C-tab>") 'cycle-window)
|
||||||
|
|
||||||
|
;; Exit prompt
|
||||||
|
(defun foreach (alist func)
|
||||||
|
(while alist
|
||||||
|
(progn
|
||||||
|
(funcall func (car alist))
|
||||||
|
(setq alist (cdr alist)))))
|
||||||
|
|
||||||
|
;(defun emacs-exit-prompt ()
|
||||||
|
; (foreach
|
||||||
|
; (buffer-list)
|
||||||
|
; (lambda (buffer)
|
||||||
|
; (cond
|
||||||
|
; ((string-match "^\\*.*\\*$" (buffer-name buffer)) nil)
|
||||||
|
; ((null (buffer-modified-p buffer)) nil)
|
||||||
|
; (t nil)))))
|
||||||
|
|
||||||
;; Latex german
|
;; Latex german
|
||||||
(quail-define-package "latex-german" "UTF-8" "LaGe" t
|
(quail-define-package "latex-german" "UTF-8" "LaGe" t
|
||||||
"Transforms umlauts to the better latex notation.
|
"Transforms umlauts to the better latex notation.
|
||||||
|
|
Loading…
Reference in a new issue