Quel est votre config emacs ?

Voici la mienne :

.emacs
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
;; Auto complettition                                                                                                                        
(load-file "~/.emacs.d/expander.el")
(load-file "~/.emacs.d/pulldown.el")
(load-file "~/.emacs.d/auto-complete.el")
(load-file "~/.emacs.d/auto-complete-config.el")
(load-file "~/.emacs.d/auto-complete-extension.el")
 
;; Les skeleton                                                                                                                              
(load-file "~/.emacs.d/skeleton.el")
 
;; Les auto                                                                                                                                  
(load-file "~/.emacs.d/auto.el")
 
;; Les fonctions                                                                                                                             
(load-file "~/.emacs.d/fonctions.el")
 
;; Pour le respet de la norme                                                                                                                
(load-file "~/.emacs.d/norme.el")
 
;; Les raccourcis                                                                                                                            
(load-file "~/.emacs.d/raccourcis.el")
 
;; Les truc utiles                                                                                                                           
(load-file "~/.emacs.d/utils.el")
 
;; La personnalisation                                                                                                                       
(load-file "~/.emacs.d/tunning.el")
 
;; Autre truc                                                                                                                                
(load-file "~/.emacs.d/other.el")
skeleton.el

Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
;; Skeleton des headers protege
(define-skeleton insert-protect-header
  "Inserts a define to protect the header file."
  ""
  '(setq str (file-name-sans-extension
          (file-name-nondirectory (buffer-file-name))))
  "#ifndef __"(upcase str)"_H__\n"
  "# define __"(upcase str)"_H__\n"
  "\n"
  "\n"
  "\n"
  "#endif /* !__"(upcase str)"_H__ */\n")
 
;; Skeleton des Makefiles
(define-skeleton create-makefile
  "Create a Makefile."
  ""
  "NAME        = \n"
  "\n"
  "SRCDIR        = src\n"
  "OBJDIR        = obj\n"
  "\n"
  "SRC        = \n"
  "\n"
  "LIB        = -Llib/ -lmy\n"
  "INC        = -I -Iinclude/\n"
  "\n"
  "OBJ        = $(SRC:.c=.o)\n"
  "CC        = /usr/bin/gcc\n"
  "CFLAGS        = -O2\n"
  "CDEBUG        = -W -Wall -ansi -pedantic -g -ggdb\n"
  "RM        = rm -f\n"
  "ECHO        = echo -e\n"
  "\n"
  "$(NAME)        : $(OBJ)\n"
  "          @$(CC) $(INC) $(CFLAGS) -o $(NAME) $(OBJDIR)/$(OBJ) $(LIB)\n"
  "          @$(ECHO) '\\033[0;32m> Compiled\\033[0m'\n"
  "\n"
  "clean        :\n"
  "          -@$(RM) $(OBJ)\n"
  "          -@$(RM) *~\n"
  "          -@$(RM) \#*\#\n"
  "          @$(ECHO) '\\033[0;35m> Directory cleaned\\033[0m'\n"
  "\n"
  "all        : $(NAME)\n"
  "\n"
  "fclean        : clean\n"
  "          -@$(RM) $(NAME)\n"
  "          @$(ECHO) '\\033[0;35m> Remove executable\\033[0m'\n"
  "\n"
  "re        : fclean all\n"
  "\n"
  ".PHONY        : all clean re\n"
  "\n"
  "debug        : $(OBJ)\n"
  "          @$(CC) $(INC) $(CDEBUG) -o $(NAME) $(OBJDIR)/$(OBJ) $(LIB)\n"
  "          @$(ECHO) '\\033[0;32m> Mode Debug: done\\033[0m'\n"
  "\n"
  ".c.o        : \n"
  "          $(CC) $(INC) $(CFLAGS) -o $(OBJDIR)/$@ -c $<\n")
utils.el
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
;; Lancer le man
(defun vectra-man-on-word ()
  "Appelle le man sur le mot pointe par le curseur"
  (interactive)
  (manual-entry (current-word)))
 
;; Suppression des espaces en fin de ligne a l'enregistrement
(add-hook 'c++-mode-hook '(lambda ()
  (add-hook 'write-contents-hooks 'delete-trailing-whitespace nil t)))
(add-hook   'c-mode-hook '(lambda ()
  (add-hook 'write-contents-hooks 'delete-trailing-whitespace nil t)))
 
;; Laisser le curseur en place lors d'un defilement par pages.
;; Par defaut, Emacs place le curseur en debut ou fin d'ecran
;; selon le sens du defilement.
(setq scroll-preserve-screen-position t)
 
;; Complette automatiquement ce que vous tapez dans le mini-buffer
(icomplete-mode 1)
 
;; Pouvoir utiliser la completition sous emacs en ignorant la casse
(setq completion-ignore-case t)
 
;; Supprime les fichier ~
(setq make-backup-files nil)
 
;; parenthese em couleur
(custom-set-variables
 '(show-paren-mode t))
(custom-set-faces)
 
;; yes > y | no > n
(fset 'yes-or-no-p 'y-or-n-p)
 
;; Affiche le numero de ligne et de colonne
(column-number-mode t)
(line-number-mode t)
 
;; Enlever le message au demarrage
(setq inhibit-startup-message t)
 
;; Remplacer le texte selectionne si on tape
(delete-selection-mode t)
 
;; Affiche l'heure au format 24h
(setq display-time-24hr-format t)
(setq displat-time-day-and-date t)
 
;; Sauvegarder la session
(desktop-load-default)
(desktop-read)
 
;; ido mode
(require 'ido)
(ido-mode t)
(setq ido-enable-flex-matching t)
raccourcis.el
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
;; Reduit la fontion sur elle meme
(add-hook 'c-mode-common-hook 'hs-minor-mode)
(add-hook 'lisp-mode-hook 'hs-minor-mode)
(add-hook 'emacs-lisp-mode-hook 'hs-minor-mode)
(add-hook 'python-mode-hook 'hs-minor-mode)
(global-set-key [f1] 'hs-hide-block)
 
;; Et la 'de'reduit
(global-set-key [f2] 'hs-show-block)
 
;; F3 : lance le man sur le mot ou se trouve le curseur
(global-set-key [f3] 'vectra-man-on-word)
 
;; F6 -> compiler
(setq compilation-window-height 10)
(setq compilation-window-width 10)
(global-set-key [f6] `compile)
 
;; F7 -> GDB
(setq-default gdb-many-windows t)
(global-set-key [f7] `gdb)
 
;; F8 -> aller a la prochaine erreur de compilation
(global-set-key    [f8] 'next-error)
Et vous ?