-
Notifications
You must be signed in to change notification settings - Fork 2
/
init.el
82 lines (59 loc) · 2.58 KB
/
init.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
(defcustom Kuautli-el-home "~/.emacs.d/Kuautli-el"
"Establece la carpeta de donde se obtendran las configuraciones del
paquete kuautli-el")
(setq inhibit-splash-screen t) ;; Deshabilita pantalla de inicio
(put 'scroll-left 'disabled nil) ;; Deshabilita el scroll de lado izquierdo
(put 'erase-buffer 'disabled nil) ;; activa la funcion de borrar todo el bufer
(scroll-bar-mode t) ;; Habilita a barra de desplasamiento
;; Establece los espacios de un solo color
(custom-set-faces
'(whitespace-hspace ((t (:foreground "darkgray"))))
'(whitespace-space ((t (:foreground "darkgray"))))
'(whitespace-tab ((t (:foreground "darkgray")))))
(custom-set-variables
;; Propiedades de fill-column-indicator
'(fci-rule-color "#555555")
'(fci-rule-width 4))
;; Cambia el acceso para clasico modo de buffer por ibuffer
(global-set-key (kbd "C-x C-b") 'ibuffer)
(show-paren-mode 1) ;; resalta los parentesis opuestos
(column-number-mode 1) ;; muestra la columna actual en la linea de modo
(cua-mode 1) ;; activa el modo cua - copiar/pegar/cortar con las combinaciones
;; teclas mas conocidad - C-c, C-x, C-v
(ido-mode 1) ;; Activa el modo ido, para un interactivo modo de apertura
;; y seleccion de ficheros o buffers
(load-theme 'wombat) ;; Estable el tema por defecto
(display-time) ;; Muestra la hora actual en la linea de modo
(setq indent-tabs-mode nil) ;; Desactiva el tabulador
(setq tab-width 4) ;; Establece que cuando se presione TAB se avanzara 4 espacios
;; Combinación de teclas que ayuda a visualizar el contenido
;; del kill-ring
(global-set-key (kbd "C-c y") '(lambda ()
"Muestra el kill-ring"
(interactive)
(popup-menu 'yank-menu)))
(let ((default-directory Kuautli-el-home))
(normal-top-level-add-subdirs-to-load-path)
;; Configuraciones popwin
(require 'popwin)
(setq display-buffer-function ;; modo que permite la creacion de ventanas
'popwin:display-buffer) ;; para mensajes emergentes
;; Configuraciones autopair
(require 'autopair)
(autopair-global-mode)
;; Configuraciones yasnippet
(require 'yasnippet)
(yas-global-mode 1)
;; regla de 80 columnas
(require 'fill-column-indicator)
(setq-default fill-column 80)
(require 'zlc)
(let ((map minibuffer-local-map))
;;; like menu select
(define-key map (kbd "<down>") 'zlc-select-next-vertical)
(define-key map (kbd "<up>") 'zlc-select-previous-vertical)
(define-key map (kbd "<right>") 'zlc-select-next)
(define-key map (kbd "<left>") 'zlc-select-previous)
;;; reset selection
(define-key map (kbd "C-c") 'zlc-reset))
)