Re: bien configurer son .emacs
Bonjour Le vendredi 2 mars 2018 17:20:02 UTC+1, Bernard Schoenacker a écrit : > bonjour, > > désolé pour le troll poilu ... > > je recherche un ensemble de .emacs à employer > pour: > > LaTeX (auctex ?) (muktilingue et bidi) > mh-e (mail) > > c'est pour mettre le pied à l'étrier à un préadolescent précoce > et pour moi > > slt > bernard .vimrc, çà c'est plus sérieux tant cas faire quelque chose le faire bien -- Ptilou
Re: bien configurer son .emacs
J'ai juste ça que j'avais rédigé il y a bien longtemps. Je ne sais pas si ça correspond à ta demande Dans mon .emacs (add-hook 'tex-mode-hook '(lambda ()(require 'latex))) Pour charger latex.el Le 2 mars 2018 à 17:11, Bernard Schoenacker a écrit : > bonjour, > > désolé pour le troll poilu ... > > je recherche un ensemble de .emacs à employer > pour: > > LaTeX (auctex ?) (muktilingue et bidi) > mh-e (mail) > > c'est pour mettre le pied à l'étrier à un préadolescent précoce > et pour moi > > slt > bernard > (setq tex-compile-defaul "make") (setq compile-command "make") (setq compilation-read-command nil) (local-set-key [(f5)] 'compile) ;; Ferme la fenêtre de compilation s'il n'y a pas d'erreur (defun compilation-exit-autoclose (status code msg) ;; Si compile retourne 0 (when (and (eq status 'exit) (zerop code)) ;; the *compilation* buffer, so that C-x b doesn't go there (bury-buffer) ;; and delete the *compilation* window (delete-window (get-buffer-window (get-buffer "*compilation*" ;; Always return the anticipated result of compilation-exit-message-function (cons msg code)) ;; Specify my function (maybe I should have done a lambda function) (setq compilation-exit-message-function 'compilation-exit-autoclose) (defun insertdescription () "Insert un bllock description LaTeX." (interactive) (insert "\\begin{description}") (insert "\n\\item[]") (insert "\n\\item[]") (insert "\n\\item[]") (insert "\n\\item[]") (insert "\n\\item[]") (insert "\n\\item[]") (insert "\n\\end{description}") (backward-char 59) ) (local-set-key [(alt d)] 'insertdescription) ;;; (defun insertitemize () "Insert un block itemize LaTeX." (interactive) (insert "\\begin{itemize}") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\end{itemize}") (backward-char 49) ) (local-set-key [(alt i)] 'insertitemize) ;;; (defun insertenumerate () "Insert un block enumerate LaTeX." (interactive) (insert "\\begin{enumerate}") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\item ") (insert "\n\\end{enumerate}") (backward-char 51) ) (local-set-key [(alt e)] 'insertenumerate) ;;; (defun insertchapter() "Insert un chapter LaTeX." (interactive) (insert "\\chapter{}") (backward-char 1) ) (local-set-key [(alt c)] 'insertchapter) ;;; (defun insertsection() "Insert une section LaTeX." (interactive) (insert "\\section{}\\label{}%") (backward-char 10) ) (local-set-key [(alt s)] 'insertsection) ;;; (defun insertsubsection() "Insert une subsection LaTeX." (interactive) (insert "\\subsection{}") (backward-char 1) ) (local-set-key [(alt S)] 'insertsubsection) ;;; (defun insertsubsubsection() "Insert une subsubsection LaTeX." (interactive) (insert "\\subsubsection{}") (backward-char 1) ) (local-set-key [(A M s)] 'insertsubsubsection) ;;; (defun insertparagraph() "Insert un paragraph LaTeX." (interactive) (insert "\\paragraph{}") (backward-char 1) ) (local-set-key [(alt p)] 'insertparagraph) ;;; (defun insertsubparagraph() "Insert un subparagraph LaTeX." (interactive) (insert "\\subparagraph{}") (backward-char 1) ) (local-set-key [(alt P)] 'insertsubparagraph) ;;; (defun insertfigure() "Insert une figure LaTeX." (interactive) (insert "\\begin{figure}[!h]") (insert "\n\\centering") (insert "\n\\includegraphics{}%") (insert "\n\\caption{}%") (insert "\n\\label{}%") (insert "\n\\end{figure}\\FloatBarrier") (previous-line 3) (backward-char 2) ) (local-set-key [(alt f)] 'insertfigure) ;; ;;; (defun insertincludegraphics() "Insert un includegraphics LaTeX." (interactive) (insert "\n\\includegraphics{}%") (backward-char 2) ) (local-set-key [(alt G)] 'insertincludegraphics) ;;; (defun insertlabel() "Insert un label LaTeX." (interactive) (insert "\\label{}%") (backward-char 2) ) (local-set-key [(alt l)] 'insertlabel) ;;; (defun insertvref() "Insert une référence LaTeX." (interactive) (insert "\\vref{}") (backward-char 1) ) (local-set-key [(alt v)] 'insertvref) ;;; (defun insertvpageref() "Insert une référence de page LaTeX." (interactive) (insert "\\vpageref{}") (backward-char 1) ) (local-set-k