logo Debian Debian Debian-France Debian-Facile Debian-fr.org Forum-Debian.fr Debian ? Communautés logo inclusivité

Debian-facile

Bienvenue sur Debian-Facile, site d'aide pour les nouveaux utilisateurs de Debian.

Vous n'êtes pas identifié(e).


L'icône rouge permet de télécharger chaque page du wiki visitée au format PDF et la grise au format ODT → ODT PDF Export

Différences

Ci-dessous, les différences entre deux révisions de la page.

Lien vers cette vue comparative

Prochaine révision
Révision précédente
utilisateurs:sogal:config:emacs [18/11/2014 00:22]
sogalpunx créée
utilisateurs:sogal:config:emacs [11/11/2015 15:14] (Version actuelle)
sogal
Ligne 1: Ligne 1:
 ====== dot_emacs ====== ====== dot_emacs ======
-<code fichier>​ +<​code ​lisp fichier.emacs> 
-;; Ajout à la configuration de base:+(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.
  
-;;Définition du format ​des numérations ​de ligne:+ ;; st pour afficher elinks: 
 + '​(browse-url-elinks-wrapper (quote ("​st"​ "​-e"​))) 
 + '​(compose-mail-user-agent-warnings nil) 
 +  
 + ;; confirmer pour quitter: 
 + '​(confirm-kill-emacs (quote y-or-n-p)) 
 + '​(custom-enabled-themes (quote (molokai))) 
 + '​(custom-safe-themes 
 +   ​(quote 
 +    ("​fe20c1ea61a2836a5cea69963865b5b8df8c480ccaf3f11ad7f2e1f543f6c274"​ "​c3c0a3702e1d6c0373a0f6a557788dfd49ec9e66e753fb24493579859c8e95ab"​ default))) 
 + '​(gnus-directory "​~/​news/"​) 
 + '​(imap-default-user "​blablapeople"​) 
 + '​(imap-store-password t) 
 + '​(inhibit-startup-screen t) 
 + '​(message-directory "​~/​mail/"​) 
 + '​(read-mail-command (quote gnus)) 
 + '​(send-mail-function (quote smtpmail-send-it)) 
 + '​(smtpmail-smtp-server "​server.net"​) 
 + '​(smtpmail-smtp-service 465) 
 + '​(smtpmail-smtp-user "​blablapeople"​) 
 + '​(smtpmail-stream-type (quote ssl)) 
 + '​(user-full-name "​blabla"​) 
 + '​(user-mail-address "​blabla"​) 
 + 
 +;;;;;;;;;;;;;;;;;;;;;​ 
 +;; sogal dot emacs ;; 
 +;;;;;;;;;;;;;;;;;;;;;​ 
 + 
 +;; support de la souris dans le terminal 
 +;; (require '​mouse) 
 +;; (xterm-mouse-mode t) 
 +;; (global-set-key (kbd "<​mouse-5>"​) '​scroll-up-line) 
 +;; (global-set-key (kbd "<​mouse-4>"​) '​scroll-down-line) 
 + 
 +;; affichage ​des numéros ​de ligne (et de colonnes en bas) 
 +(global-linum-mode t)
 (setq linum-format "%d ") (setq linum-format "%d ")
 +(setq column-number-mode t)
  
 ;; custom quote level colorizing in mail-mode: ;; custom quote level colorizing in mail-mode:
Ligne 15: Ligne 55:
                   (0 '​mail-double-quoted-text-face))))))                   (0 '​mail-double-quoted-text-face))))))
  
-;; restriction des lignes à 80 caractères:​+;; restriction des lignes à 80 caractères :
 (setq-default fill-column 80) (setq-default fill-column 80)
-;;(add-hook 'text-mode-hook '​turn-on-auto-fill)+    ​;; pour le mode mail :
 (add-hook '​mail-mode-hook '​turn-on-auto-fill) (add-hook '​mail-mode-hook '​turn-on-auto-fill)
 +    ;; et le mode python :
 +(add-hook '​python-mode-hook ​
 +          (lambda ()
 +            (turn-on-auto-fill)
 +            (linum-mode)))
  
 ;; PO Mode Line Wrapping: ;; PO Mode Line Wrapping:
Ligne 42: Ligne 87:
    ​(kill-buffer tmp-buf)    ​(kill-buffer tmp-buf)
    ​(delete-file tmp-file)))))    ​(delete-file tmp-file)))))
- 
-;; restriction de la taille des lignes en mode PO: 
-(add-hook '​po-subedit-mode-hook '​(lambda () (longlines-mode 1))) 
-(add-hook '​po-subedit-exit-hook '​(lambda () (longlines-mode 0))) 
  
 ;; démarrer emacs dans mutt en mode mail ;; démarrer emacs dans mutt en mode mail
-;;​(server-start) 
 (add-to-list '​auto-mode-alist '​("/​mutt"​ . mail-mode)) (add-to-list '​auto-mode-alist '​("/​mutt"​ . mail-mode))
  
 ;; affecter replace-string:​ ;; affecter replace-string:​
-(global-set-key (kbd "C-C-r") '​replace-string+(global-set-key (kbd "C-C-r") '​replace-string)
- +
-;; activer scroll à la souris en mode xterm-mouse:​ +
-(defun scroll-up-10-lines () +
-  "​Scroll up 10 lines"​ +
-  (interactive) +
-  (scroll-up 10)) +
- +
-(defun scroll-down-10-lines () +
-  "​Scroll down 10 lines"​ +
-  (interactive) +
-  (scroll-down 10)) +
- +
-(global-set-key (kbd "<​mouse-4>"​) '​scroll-down-10-lines) +
-(global-set-key (kbd "<​mouse-5>"​) '​scroll-up-10-lines+
  
 ;; auto-completion avec la touche TAB: ;; auto-completion avec la touche TAB:
Ligne 76: Ligne 102:
 ;; affecter ispell-buffer à une touche: ;; affecter ispell-buffer à une touche:
 (global-set-key (kbd "​M-£"​) '​ispell-buffer) (global-set-key (kbd "​M-£"​) '​ispell-buffer)
 +
 +;; affecter next-buffer à Super-Page Down:
 +(global-set-key (kbd "<​s-next>"​) '​next-buffer)
 +;; et affecter previous-buffer à Super-Page UP:
 +(global-set-key (kbd "<​s-prior>"​) '​previous-buffer)
 +
 +;; configuration courriel
 +(setq gnus-select-method
 +      '​(nnimap "​mail"​
 +       (nnimap-address "​mail"​)
 +       (nnimap-server-port "​imaps"​)
 +       (nnimap-stream ssl)))
 +
 +;; ajout de la transparence (totale, cadre compris) :
 +(set-frame-parameter (selected-frame) 'alpha '(98 70))
 +(add-to-list '​default-frame-alist '​(alpha 98 70))
 +
 +;; fonction et raccourcis de toggle de la transparence :
 +(eval-when-compile (require 'cl))
 + ​(defun toggle-transparency ()
 +   ​(interactive)
 +   (if (/=
 +        (cadr (frame-parameter nil '​alpha))
 +        100)
 +       ​(set-frame-parameter nil 'alpha '(100 100))
 +     ​(set-frame-parameter nil 'alpha '(98 70))))
 +(global-set-key (kbd "C-c t") '​toggle-transparency)
 +(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.
 + )
 </​code>​ </​code>​
  
utilisateurs/sogal/config/emacs.1416266543.txt.gz · Dernière modification: 18/11/2014 00:22 par sogalpunx

Pied de page des forums

Propulsé par FluxBB