(custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(cua-mode t) '(current-language-environment "Spanish") '(default-input-method "spanish-keyboard")) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. ) ;; Mapea backspace [delete-backward-char] a C-h ;(define-key key-translation-map [?\C-?] [?\C-h]) ;; map M-backspace [backward-kill-word] to M-h (define-key key-translation-map [?\M-\d] [?\M-h]) ;; map C-h to backspace (define-key key-translation-map [?\C-h] [?\C-?]) ;; map M-h [mark-paragraph] to M-backspace (define-key key-translation-map [?\M-h] [?\M-\d]) ;; tip: Tab is available as C-i ;; RET is available as C-j or C-m ;; ESC is available as C-[ (if (not window-system) (normal-erase-is-backspace-mode 0)) ;; Configuración de anthk (prefer-coding-system 'utf-8) (set-default-coding-systems 'utf-8) (set-terminal-coding-system 'utf-8) (set-keyboard-coding-system 'utf-8) (setq-default buffer-file-coding-system 'utf-8) (setq default-buffer-file-coding-system 'utf-8) ;;Configura el line-wrap ; Configura linewrap en caracteres ;(setq word-wrap t) ;configura linewrap a palabras (setq-default word-wrap t) (set-display-table-slot standard-display-table 'wrap ?\ ) (setq backup-directory-alist '(("." . "~/.emacs.d/backup")) backup-by-copying t ; Don't delink hardlinks version-control t ; Usar números de versión en los respaldos delete-old-versions t ; Borrar respaldos excesivos automáticamente kept-new-versions 20 ; Cuantas veresiones de respaldo nuevas mantener kept-old-versions 5 ; y cuantas de las versiones viejas mantener )