Exit prompt attempt

This commit is contained in:
Valentin Gehrke 2017-05-25 16:47:41 +02:00
parent 5fad0abd17
commit ec8fbec3c4

View file

@ -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.