[HS] Couper les lignes automatiquement sous emacs

pascal

12/11/2007 à 16:20

GiGGz a écrit :

Bonjour la liste,

Désolé pour ce HS. Je cherche à ce que sous emacs les lignes se coupent
automatiquement à 72 caractères. Pour l'instant je peux écrire des
lignes très longues sans qu'emacs les coupe.
Que faut il ajouter dans le .emacs pour avoir ça ?

Merci d'avance.
Guillaume

dans .emacs

(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

P.

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

GiGGz

12/11/2007 à 16:30

pascal a écrit :

GiGGz a écrit :
Bonjour la liste,

Désolé pour ce HS. Je cherche à ce que sous emacs les lignes se coupent
automatiquement à 72 caractères. Pour l'instant je peux écrire des
lignes très longues sans qu'emacs les coupe.
Que faut il ajouter dans le .emacs pour avoir ça ?

Merci d'avance.
Guillaume

dans .emacs

(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

P.

Merci de ta rapide réponse!

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

Dominique Asselineau

12/11/2007 à 18:10

pascal wrote on Mon, Nov 12, 2007 at 04:09:49PM +0100

GiGGz a écrit :
> Bonjour la liste,
>
> Désolé pour ce HS. Je cherche à ce que sous emacs les lignes se coupent
> automatiquement à 72 caractères. Pour l'instant je peux écrire des
> lignes très longues sans qu'emacs les coupe.
> Que faut il ajouter dans le .emacs pour avoir ça ?
>
> Merci d'avance.
> Guillaume
>
>

dans .emacs

(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

Et lorsq'on édite le texte, ce qui casse le remplissage, il y a la commande

fill-paragraph (touche esc-q)

qui reformate le paragraphe selon les mêmes paramètres de longueur de
ligne.

dom

P.

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

--
+------------------------------------o-------------------------------------+
| P-mail: | E-mail: |
| E.N.S.T. - Dep. TSI | |
| Dominique Asselineau | Phone: (33/0) 1 45 81 78 91 |
| 46, rue Barrault | Fax: (33/0) 1 45 81 37 94 |
| 75634 PARIS Cedex 13 - France | |
+------------------------------------o-------------------------------------+

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

mouss

12/11/2007 à 22:20

GiGGz wrote:

pascal a écrit :
GiGGz a écrit :
Bonjour la liste,

Désolé pour ce HS. Je cherche à ce que sous emacs les lignes se coupent
automatiquement à 72 caractères. Pour l'instant je peux écrire des
lignes très longues sans qu'emacs les coupe.
Que faut il ajouter dans le .emacs pour avoir ça ?

Merci d'avance.
Guillaume

dans .emacs

(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

P.

Merci de ta rapide réponse!

et tu peux le faire pour un buffer en tapant la commande:
auto-fill-mode

tu peux le désactiver en retapant la même commande.

parfois, ce n'est pas désirable d'avoir la coupure automatique.

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

giggz

12/11/2007 à 22:50

mouss a écrit :

GiGGz wrote:
pascal a écrit :
GiGGz a écrit :
Bonjour la liste,

Désolé pour ce HS. Je cherche à ce que sous emacs les lignes se coupent
automatiquement à 72 caractères. Pour l'instant je peux écrire des
lignes très longues sans qu'emacs les coupe.
Que faut il ajouter dans le .emacs pour avoir ça ?

Merci d'avance.
Guillaume

dans .emacs

(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

P.

Merci de ta rapide réponse!

et tu peux le faire pour un buffer en tapant la commande:
auto-fill-mode

tu peux le désactiver en retapant la même commande.

parfois, ce n'est pas désirable d'avoir la coupure automatique.

Merci pour vos réponses. Mais pour l'instant...ça ne marche pas :
je suis en sid avec le dernier emacs. quand je mets
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

dans mon .emacs j'ai droit un ce message d'erreur :
An error has occurred while loading `/home/giggz/.emacs':

Invalid read syntax: )

alors j'enlève la dernière parenthèse; là tout se lance mais je ne vois
pas du tout de changement dans le comportement d'emacs :
si je tape dans un fichier vide une grande ligne ça ne va pas à la ligne
automatiquement...

Ciao

je copie colle le .emacs que j'ai recup sur le net :
;; .emacs

;; Copyright (C) 2000-2001-2002 Philippe Dumont
;; Author: Philippe Dumont
;; Last version : http://www.lifl.fr/~dumont/emacs/

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.

;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.

;;##########################################################
;; Commentaires

;; J'ai pille le travail de nombreuses personnes pour realiser ce .emacs
;; En voici la liste non exhaustive :

;; Jonathan Bailleul
;; Laurent Schurter
;; Stéphane Levant
;; Philippe Marquet
;; Pierre Boulet

;; Pour que la configuration soit complète, il faut rajouter
;; les lignes suivantes dans son .Xdefaults :

;; emacs.title: Philippe's dot emacs !
;; emacs*.cursorColor: black
;; emacs*.pointerColor: black
;; emacs*.foreground: black
;; emacs*.background: white
;; emacs*.toolBar: 0
;; emacs*.font:
-adobe-courier-medium-r-normal--12-120-75-75-m-70-iso8859-15

;; Pour recharger son .Xdefaults sans relancer le serveur X
;; xrdb -load .Xdefaults
;; Il faut également récupérer les 5 fichiers annexes :
;; Calendrier.el, Couleurs.el, Mouse-wheel.el, Souris.el, Vectra.el

;; Si vous utilisez ce .emacs, il suffit d'appuyer sur F1
;; sur une fonction afin d'obtenir de l'aide

;Enlève la barre d'outils et la bar de défilement
(tool-bar-mode -1)
(scroll-bar-mode -1)

;pas de message au démarrage
(setq inhibit-startup-message t)

;pas de biiiiiiiip
(setq visible-bell 't)

;; coupe les lignes au 72 ieme caractere
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

; Activation de la surbrillance
(transient-mark-mode 1)

;dico français
(setq ispell-program-name "aspell")

;;##########################################################
;; Langue

;;(set-language-environment 'utf-8)
;;(prefer-coding-system 'mule-utf-8)

;;(prefer-coding-system 'latin-1)
;;(and (boundp 'coding-category-utf-8)
;; (set-coding-priority
;; '( coding-category-utf-8
;; coding-category-iso-8-1
;; coding-category-iso-8-2
;; coding-category-raw-text )))

;;(defun getlocale (vars)
;; (if vars
;; (let ((locale (getenv (car vars))))
;; (if locale locale (getlocale (cdr vars))))
;; ""
;;))

;;(if (string-match "UTF-8>" (getlocale '("LC_ALL" "LC_CTYPE" "LANG")))
;; (progn
;; (set-keyboard-coding-system 'utf-8)
;; (set-terminal-coding-system 'utf-8))
;;)
;;***Fin Langue

;;##########################################################
;; Fichiers annexes
;;

;;inclusion de la gestion des couleurs
(load-file "~/.emacs.d/Perso/Couleurs.el")

;;inclusion de la gestion de la souris et de sa molette
(load-file "~/.emacs.d/Perso/Souris.el")

;;inclusion des fonctions personnelles
(load-file "~/.emacs.d/Perso/Vectra.el")

;;inclusion du calendrier
(load-file "~/.emacs.d/Perso/Calendrier.el")

;;***Fin fichiers annexes

;;##########################################################
;; Section Mode des fichiers
;;

;;permettre à la speedbar de reconnaître plus de fichiers
(require 'speedbar)
(speedbar-add-supported-extension ".(inc|txt)")
(speedbar-add-supported-extension ".(inc|ml[i]?)")
(speedbar-add-supported-extension ".(inc|xml)")
(speedbar-add-supported-extension ".(inc|css)")

;;*** Fin Section Mode des fichiers

;;##########################################################
;; Section Fonctions événementielles
;;

;;Mode C
(setq c-mode-hook
(lambda ()
(c-set-style "GNU")
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode C++
(setq c++-mode-hook
(lambda ()
(c-set-style "GNU")
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode Java
(setq java-mode-hook
(lambda ()
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode ObjC
(setq objc-mode-hook
(lambda ()
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode Makefile
(setq makefile-mode-hook
(lambda ()
))

;;Mode LaTEX
(setq LaTex-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq latex-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq TeX-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq tex-mode-hook
(lambda ()
(auto-fill-mode t)
))

;;Mode texte
(add-hook 'text-mode-hook
(lambda ()
))

;;Mode Shell (command line)
(setq shell-mode-hook
(lambda ()
))

;;Mode Shell-script (script editing)
(setq sh-mode-hook
(lambda ()
))

;;Mode Emacs-Lisp (.emacs)
(setq emacs-lisp-mode-hook
(lambda ()
(local-set-key [f9] 'eval-current-buffer)
))

;;Mode SGML-HTML
(setq sgml-mode-hook
(lambda ()
))

;;** Fin Section Fonctions événementielles

;;##########################################################
;;Mode par défaut
;;

;; la langue du dictionnaire
(setq ispell-dictionary "francais")

;; on démarre en mode texte
(setq initial-major-mode 'text-mode)

;; le mode par défaut
(setq default-major-mode 'text-mode)

;; faire peur au curseur
(mouse-avoidance-mode 'jump)

;; montre les parenthèses
(show-paren-mode)

;; pas de re-définition intempestive de certaines touches après
pc-selection-mode
(setq pc-select-selection-keys-only t)
;; sélection avec shift
(pc-selection-mode)

;; pas de ligne en plus à la fin du fichier
(setq next-line-add-newlines nil)

;; quelle heure est-il ??
(setq display-time-day-and-date t)
(setq display-time-24hr-format t)
(display-time)

;; la completion respecte la casse
(setq dabbrev-case-replace nil)

;;*** Fin mode par défault

;;##########################################################
;; Section raccourcis clavier

;; Globals
(define-key global-map "^x^z" 'suspend-emacs)

(global-set-key [delete] 'delete-char)

;; Meta
(global-set-key "M-l" 'goto-line)
(global-set-key "M-j" 'switch-to-buffer)

;; Ctrl
(global-set-key "C-z" 'copy-region-as-kill)

;; Touches de fonctions
;; F1 : lance l'apropos sur le mot ou se trouve le curseur
(global-set-key [f1] 'vectra-apropos-on-word)
;; Ctrl+F1 : lance man sur le mot ou se trouve le curseur
(global-set-key [C-f1] 'vectra-man-on-word)
;; F2 : coupe le buffer en 2 verticalement
(global-set-key [f2] 'split-window-vertically)
;; F2 : coupe le buffer en 2 horizontalement
(global-set-key [C-f2] 'split-window-horizontally)
;; F3 : non affecté
;; F4 : commente la ligne courante suivant le mode choisi (C++,C,...)
(global-set-key [f4] 'vectra-comment-region)
;; Ctrl + F4 : decommente la ligne courante suivant le mode choisi
(C++,C,...)
(global-set-key [C-f4] 'vectra-uncomment-region)
;; F5 : la complétion
(global-set-key [f5] 'dabbrev-expand)
;; F6 : lance ispell
(global-set-key [f6] 'ispell-buffer)
(global-set-key [C-f6] 'ispell-word)
(global-set-key [M-f6] 'ispell-region)
;; F7 : indente correctement tout le buffer courant
(global-set-key [f7] 'vectra-indent-hilit-buffer)
;; F8 : sauvegarde le buffer en html
;; Nécessite le htmlize
(global-set-key [f8] 'htmlize-buffer)
;; F9 : lance la compilation
(global-set-key [f9] 'compile)
;; F10 : va à l erreur suivante
(global-set-key [f10] 'next-error)
;; F11 : lance la speedbar
(global-set-key [f11] 'speedbar)
;; F12 : tue le buffer courant
(global-set-key [f12] 'kill-buffer)

;; Flèches
(global-set-key [M-left] 'backward-sentence)
(global-set-key [M-right] 'forward-sentence)
(global-set-key [M-up] 'beginning-of-buffer)
(global-set-key [M-down] 'end-of-buffer)

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

mouss a écrit :

GiGGz wrote:

pascal a écrit :

GiGGz a écrit :

Bonjour la liste,

Désolé pour ce HS. Je cherche à ce que sous emacs les lignes se coupent
automatiquement à 72 caractères. Pour l'instant je peux écrire des
lignes très longues sans qu'emacs les coupe.
Que faut il ajouter dans le .emacs pour avoir ça ?

Merci d'avance.
Guillaume

dans .emacs

(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

P.

Merci de ta rapide réponse!

et tu peux le faire pour un buffer en tapant la commande:
auto-fill-mode

tu peux le désactiver en retapant la même commande.

parfois, ce n'est pas désirable d'avoir la coupure automatique.

Merci pour vos réponses. Mais pour l'instant...ça ne marche pas :
je suis en sid avec le dernier emacs. quand je mets
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

dans mon .emacs j'ai droit un ce message d'erreur :
An error has occurred while loading `/home/giggz/.emacs':

Invalid read syntax: )

alors j'enlève la dernière parenthèse; là tout se lance mais je ne vois
pas du tout de changement dans le comportement d'emacs :
si je tape dans un fichier vide une grande ligne ça ne va pas à la ligne
automatiquement...

Ciao

je copie colle le .emacs que j'ai recup sur le net :
;; .emacs

;; Copyright (C) 2000-2001-2002 Philippe Dumont
;; Author: Philippe Dumont <dumont@lifl.fr>
;; Last version : http://www.lifl.fr/~dumont/emacs/

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.

;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.

;;##########################################################
;; Commentaires

;; J'ai pille le travail de nombreuses personnes pour realiser ce .emacs
;; En voici la liste non exhaustive :

;; Jonathan Bailleul
;; Laurent Schurter
;; Stéphane Levant
;; Philippe Marquet
;; Pierre Boulet

;; Pour que la configuration soit complète, il faut rajouter
;; les lignes suivantes dans son .Xdefaults :

;; emacs.title: Philippe's dot emacs !
;; emacs*.cursorColor: black
;; emacs*.pointerColor: black
;; emacs*.foreground: black
;; emacs*.background: white
;; emacs*.toolBar: 0
;; emacs*.font:
-adobe-courier-medium-r-normal--12-120-75-75-m-70-iso8859-15

;; Pour recharger son .Xdefaults sans relancer le serveur X
;; xrdb -load .Xdefaults
;; Il faut également récupérer les 5 fichiers annexes :
;; Calendrier.el, Couleurs.el, Mouse-wheel.el, Souris.el, Vectra.el

;; Si vous utilisez ce .emacs, il suffit d'appuyer sur F1
;; sur une fonction afin d'obtenir de l'aide

;Enlève la barre d'outils et la bar de défilement
(tool-bar-mode -1)
(scroll-bar-mode -1)

;pas de message au démarrage
(setq inhibit-startup-message t)

;pas de biiiiiiiip
(setq visible-bell 't)

;; coupe les lignes au 72 ieme caractere
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

; Activation de la surbrillance
(transient-mark-mode 1)

;dico français
(setq ispell-program-name "aspell")

;;##########################################################
;; Langue

;;(set-language-environment 'utf-8)
;;(prefer-coding-system 'mule-utf-8)

;;(prefer-coding-system 'latin-1)
;;(and (boundp 'coding-category-utf-8)
;; (set-coding-priority
;; '( coding-category-utf-8
;; coding-category-iso-8-1
;; coding-category-iso-8-2
;; coding-category-raw-text )))

;;(defun getlocale (vars)
;; (if vars
;; (let ((locale (getenv (car vars))))
;; (if locale locale (getlocale (cdr vars))))
;; ""
;;))

;;(if (string-match "UTF-8\>" (getlocale '("LC_ALL" "LC_CTYPE" "LANG")))
;; (progn
;; (set-keyboard-coding-system 'utf-8)
;; (set-terminal-coding-system 'utf-8))
;;)
;;***Fin Langue

;;##########################################################
;; Fichiers annexes
;;

;;inclusion de la gestion des couleurs
(load-file "~/.emacs.d/Perso/Couleurs.el")

;;inclusion de la gestion de la souris et de sa molette
(load-file "~/.emacs.d/Perso/Souris.el")

;;inclusion des fonctions personnelles
(load-file "~/.emacs.d/Perso/Vectra.el")

;;inclusion du calendrier
(load-file "~/.emacs.d/Perso/Calendrier.el")

;;***Fin fichiers annexes

;;##########################################################
;; Section Mode des fichiers
;;

;;permettre à la speedbar de reconnaître plus de fichiers
(require 'speedbar)
(speedbar-add-supported-extension "\.\(inc\|txt\)")
(speedbar-add-supported-extension "\.\(inc\|ml[i]?\)")
(speedbar-add-supported-extension "\.\(inc\|xml\)")
(speedbar-add-supported-extension "\.\(inc\|css\)")

;;*** Fin Section Mode des fichiers

;;##########################################################
;; Section Fonctions événementielles
;;

;;Mode C
(setq c-mode-hook
(lambda ()
(c-set-style "GNU")
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode C++
(setq c++-mode-hook
(lambda ()
(c-set-style "GNU")
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode Java
(setq java-mode-hook
(lambda ()
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode ObjC
(setq objc-mode-hook
(lambda ()
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode Makefile
(setq makefile-mode-hook
(lambda ()
))

;;Mode LaTEX
(setq LaTex-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq latex-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq TeX-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq tex-mode-hook
(lambda ()
(auto-fill-mode t)
))

;;Mode texte
(add-hook 'text-mode-hook
(lambda ()
))

;;Mode Shell (command line)
(setq shell-mode-hook
(lambda ()
))

;;Mode Shell-script (script editing)
(setq sh-mode-hook
(lambda ()
))

;;Mode Emacs-Lisp (.emacs)
(setq emacs-lisp-mode-hook
(lambda ()
(local-set-key [f9] 'eval-current-buffer)
))

;;Mode SGML-HTML
(setq sgml-mode-hook
(lambda ()
))

;;** Fin Section Fonctions événementielles

;;##########################################################
;;Mode par défaut
;;

;; la langue du dictionnaire
(setq ispell-dictionary "francais")

;; on démarre en mode texte
(setq initial-major-mode 'text-mode)

;; le mode par défaut
(setq default-major-mode 'text-mode)

;; faire peur au curseur
(mouse-avoidance-mode 'jump)

;; montre les parenthèses
(show-paren-mode)

;; pas de re-définition intempestive de certaines touches après
pc-selection-mode
(setq pc-select-selection-keys-only t)
;; sélection avec shift
(pc-selection-mode)

;; pas de ligne en plus à la fin du fichier
(setq next-line-add-newlines nil)

;; quelle heure est-il ??
(setq display-time-day-and-date t)
(setq display-time-24hr-format t)
(display-time)

;; la completion respecte la casse
(setq dabbrev-case-replace nil)

;;*** Fin mode par défault

;;##########################################################
;; Section raccourcis clavier

;; Globals
(define-key global-map "^x^z" 'suspend-emacs)

(global-set-key [delete] 'delete-char)

;; Meta
(global-set-key "M-l" 'goto-line)
(global-set-key "M-j" 'switch-to-buffer)

;; Ctrl
(global-set-key "C-z" 'copy-region-as-kill)

;; Touches de fonctions
;; F1 : lance l'apropos sur le mot ou se trouve le curseur
(global-set-key [f1] 'vectra-apropos-on-word)
;; Ctrl+F1 : lance man sur le mot ou se trouve le curseur
(global-set-key [C-f1] 'vectra-man-on-word)
;; F2 : coupe le buffer en 2 verticalement
(global-set-key [f2] 'split-window-vertically)
;; F2 : coupe le buffer en 2 horizontalement
(global-set-key [C-f2] 'split-window-horizontally)
;; F3 : non affecté
;; F4 : commente la ligne courante suivant le mode choisi (C++,C,...)
(global-set-key [f4] 'vectra-comment-region)
;; Ctrl + F4 : decommente la ligne courante suivant le mode choisi
(C++,C,...)
(global-set-key [C-f4] 'vectra-uncomment-region)
;; F5 : la complétion
(global-set-key [f5] 'dabbrev-expand)
;; F6 : lance ispell
(global-set-key [f6] 'ispell-buffer)
(global-set-key [C-f6] 'ispell-word)
(global-set-key [M-f6] 'ispell-region)
;; F7 : indente correctement tout le buffer courant
(global-set-key [f7] 'vectra-indent-hilit-buffer)
;; F8 : sauvegarde le buffer en html
;; Nécessite le htmlize
(global-set-key [f8] 'htmlize-buffer)
;; F9 : lance la compilation
(global-set-key [f9] 'compile)
;; F10 : va à l erreur suivante
(global-set-key [f10] 'next-error)
;; F11 : lance la speedbar
(global-set-key [f11] 'speedbar)
;; F12 : tue le buffer courant
(global-set-key [f12] 'kill-buffer)

;; Flèches
(global-set-key [M-left] 'backward-sentence)
(global-set-key [M-right] 'forward-sentence)
(global-set-key [M-up] 'beginning-of-buffer)
(global-set-key [M-down] 'end-of-buffer)

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to debian-user-french-REQUEST@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmaster@lists.debian.org

Vous avez filtré cet utilisateur ! Consultez son message

mouss a écrit :

GiGGz wrote:
pascal a écrit :
GiGGz a écrit :
Bonjour la liste,

Désolé pour ce HS. Je cherche à ce que sous emacs les lignes se coupent
automatiquement à 72 caractères. Pour l'instant je peux écrire des
lignes très longues sans qu'emacs les coupe.
Que faut il ajouter dans le .emacs pour avoir ça ?

Merci d'avance.
Guillaume

dans .emacs

(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

P.

Merci de ta rapide réponse!

et tu peux le faire pour un buffer en tapant la commande:
auto-fill-mode

tu peux le désactiver en retapant la même commande.

parfois, ce n'est pas désirable d'avoir la coupure automatique.

Merci pour vos réponses. Mais pour l'instant...ça ne marche pas :
je suis en sid avec le dernier emacs. quand je mets
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

dans mon .emacs j'ai droit un ce message d'erreur :
An error has occurred while loading `/home/giggz/.emacs':

Invalid read syntax: )

alors j'enlève la dernière parenthèse; là tout se lance mais je ne vois
pas du tout de changement dans le comportement d'emacs :
si je tape dans un fichier vide une grande ligne ça ne va pas à la ligne
automatiquement...

Ciao

je copie colle le .emacs que j'ai recup sur le net :
;; .emacs

;; Copyright (C) 2000-2001-2002 Philippe Dumont
;; Author: Philippe Dumont
;; Last version : http://www.lifl.fr/~dumont/emacs/

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.

;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.

;;##########################################################
;; Commentaires

;; J'ai pille le travail de nombreuses personnes pour realiser ce .emacs
;; En voici la liste non exhaustive :

;; Jonathan Bailleul
;; Laurent Schurter
;; Stéphane Levant
;; Philippe Marquet
;; Pierre Boulet

;; Pour que la configuration soit complète, il faut rajouter
;; les lignes suivantes dans son .Xdefaults :

;; emacs.title: Philippe's dot emacs !
;; emacs*.cursorColor: black
;; emacs*.pointerColor: black
;; emacs*.foreground: black
;; emacs*.background: white
;; emacs*.toolBar: 0
;; emacs*.font:
-adobe-courier-medium-r-normal--12-120-75-75-m-70-iso8859-15

;; Pour recharger son .Xdefaults sans relancer le serveur X
;; xrdb -load .Xdefaults
;; Il faut également récupérer les 5 fichiers annexes :
;; Calendrier.el, Couleurs.el, Mouse-wheel.el, Souris.el, Vectra.el

;; Si vous utilisez ce .emacs, il suffit d'appuyer sur F1
;; sur une fonction afin d'obtenir de l'aide

;Enlève la barre d'outils et la bar de défilement
(tool-bar-mode -1)
(scroll-bar-mode -1)

;pas de message au démarrage
(setq inhibit-startup-message t)

;pas de biiiiiiiip
(setq visible-bell 't)

;; coupe les lignes au 72 ieme caractere
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72))

; Activation de la surbrillance
(transient-mark-mode 1)

;dico français
(setq ispell-program-name "aspell")

;;##########################################################
;; Langue

;;(set-language-environment 'utf-8)
;;(prefer-coding-system 'mule-utf-8)

;;(prefer-coding-system 'latin-1)
;;(and (boundp 'coding-category-utf-8)
;; (set-coding-priority
;; '( coding-category-utf-8
;; coding-category-iso-8-1
;; coding-category-iso-8-2
;; coding-category-raw-text )))

;;(defun getlocale (vars)
;; (if vars
;; (let ((locale (getenv (car vars))))
;; (if locale locale (getlocale (cdr vars))))
;; ""
;;))

;;(if (string-match "UTF-8>" (getlocale '("LC_ALL" "LC_CTYPE" "LANG")))
;; (progn
;; (set-keyboard-coding-system 'utf-8)
;; (set-terminal-coding-system 'utf-8))
;;)
;;***Fin Langue

;;##########################################################
;; Fichiers annexes
;;

;;inclusion de la gestion des couleurs
(load-file "~/.emacs.d/Perso/Couleurs.el")

;;inclusion de la gestion de la souris et de sa molette
(load-file "~/.emacs.d/Perso/Souris.el")

;;inclusion des fonctions personnelles
(load-file "~/.emacs.d/Perso/Vectra.el")

;;inclusion du calendrier
(load-file "~/.emacs.d/Perso/Calendrier.el")

;;***Fin fichiers annexes

;;##########################################################
;; Section Mode des fichiers
;;

;;permettre à la speedbar de reconnaître plus de fichiers
(require 'speedbar)
(speedbar-add-supported-extension ".(inc|txt)")
(speedbar-add-supported-extension ".(inc|ml[i]?)")
(speedbar-add-supported-extension ".(inc|xml)")
(speedbar-add-supported-extension ".(inc|css)")

;;*** Fin Section Mode des fichiers

;;##########################################################
;; Section Fonctions événementielles
;;

;;Mode C
(setq c-mode-hook
(lambda ()
(c-set-style "GNU")
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode C++
(setq c++-mode-hook
(lambda ()
(c-set-style "GNU")
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode Java
(setq java-mode-hook
(lambda ()
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode ObjC
(setq objc-mode-hook
(lambda ()
(load-library "cc-cmds")
(c-toggle-auto-state t)
(c-toggle-hungry-state t)
))

;;Mode Makefile
(setq makefile-mode-hook
(lambda ()
))

;;Mode LaTEX
(setq LaTex-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq latex-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq TeX-mode-hook
(lambda ()
(auto-fill-mode t)
))
(setq tex-mode-hook
(lambda ()
(auto-fill-mode t)
))

;;Mode texte
(add-hook 'text-mode-hook
(lambda ()
))

;;Mode Shell (command line)
(setq shell-mode-hook
(lambda ()
))

;;Mode Shell-script (script editing)
(setq sh-mode-hook
(lambda ()
))

;;Mode Emacs-Lisp (.emacs)
(setq emacs-lisp-mode-hook
(lambda ()
(local-set-key [f9] 'eval-current-buffer)
))

;;Mode SGML-HTML
(setq sgml-mode-hook
(lambda ()
))

;;** Fin Section Fonctions événementielles

;;##########################################################
;;Mode par défaut
;;

;; la langue du dictionnaire
(setq ispell-dictionary "francais")

;; on démarre en mode texte
(setq initial-major-mode 'text-mode)

;; le mode par défaut
(setq default-major-mode 'text-mode)

;; faire peur au curseur
(mouse-avoidance-mode 'jump)

;; montre les parenthèses
(show-paren-mode)

;; pas de re-définition intempestive de certaines touches après
pc-selection-mode
(setq pc-select-selection-keys-only t)
;; sélection avec shift
(pc-selection-mode)

;; pas de ligne en plus à la fin du fichier
(setq next-line-add-newlines nil)

;; quelle heure est-il ??
(setq display-time-day-and-date t)
(setq display-time-24hr-format t)
(display-time)

;; la completion respecte la casse
(setq dabbrev-case-replace nil)

;;*** Fin mode par défault

;;##########################################################
;; Section raccourcis clavier

;; Globals
(define-key global-map "^x^z" 'suspend-emacs)

(global-set-key [delete] 'delete-char)

;; Meta
(global-set-key "M-l" 'goto-line)
(global-set-key "M-j" 'switch-to-buffer)

;; Ctrl
(global-set-key "C-z" 'copy-region-as-kill)

;; Touches de fonctions
;; F1 : lance l'apropos sur le mot ou se trouve le curseur
(global-set-key [f1] 'vectra-apropos-on-word)
;; Ctrl+F1 : lance man sur le mot ou se trouve le curseur
(global-set-key [C-f1] 'vectra-man-on-word)
;; F2 : coupe le buffer en 2 verticalement
(global-set-key [f2] 'split-window-vertically)
;; F2 : coupe le buffer en 2 horizontalement
(global-set-key [C-f2] 'split-window-horizontally)
;; F3 : non affecté
;; F4 : commente la ligne courante suivant le mode choisi (C++,C,...)
(global-set-key [f4] 'vectra-comment-region)
;; Ctrl + F4 : decommente la ligne courante suivant le mode choisi
(C++,C,...)
(global-set-key [C-f4] 'vectra-uncomment-region)
;; F5 : la complétion
(global-set-key [f5] 'dabbrev-expand)
;; F6 : lance ispell
(global-set-key [f6] 'ispell-buffer)
(global-set-key [C-f6] 'ispell-word)
(global-set-key [M-f6] 'ispell-region)
;; F7 : indente correctement tout le buffer courant
(global-set-key [f7] 'vectra-indent-hilit-buffer)
;; F8 : sauvegarde le buffer en html
;; Nécessite le htmlize
(global-set-key [f8] 'htmlize-buffer)
;; F9 : lance la compilation
(global-set-key [f9] 'compile)
;; F10 : va à l erreur suivante
(global-set-key [f10] 'next-error)
;; F11 : lance la speedbar
(global-set-key [f11] 'speedbar)
;; F12 : tue le buffer courant
(global-set-key [f12] 'kill-buffer)

;; Flèches
(global-set-key [M-left] 'backward-sentence)
(global-set-key [M-right] 'forward-sentence)
(global-set-key [M-up] 'beginning-of-buffer)
(global-set-key [M-down] 'end-of-buffer)

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

giggz

12/11/2007 à 23:00

[...]

Bon ça y est ça marche...mais j'ai pas compris pourquoi. j'ai copié collé :
;;;; Text mode and Auto Fill mode
;; Set up emacs to default to editing prose
(setq default-major-mode 'text-mode)
(add-hook 'text-mode-hook 'text-mode-hook-identify)
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72)

et là ça a l'air de fonctionner...si qqn a le temps de me dire pourquoi...

Bonne soirée

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

mouss

14/11/2007 à 16:50

giggz wrote:

[...]

Bon ça y est ça marche...mais j'ai pas compris pourquoi. j'ai copié collé :
;;;; Text mode and Auto Fill mode
;; Set up emacs to default to editing prose
(setq default-major-mode 'text-mode)
(add-hook 'text-mode-hook 'text-mode-hook-identify)
(add-hook 'text-mode-hook 'turn-on-auto-fill)
(defun auto-fill-hook ()
auto-fill-mode 1)
(setq fill-column 72)

et là ça a l'air de fonctionner...si qqn a le temps de me dire pourquoi...

dans ton precendet mail, t'avais deux parenthèses après 72. donc une en
trop.

--
Lisez la FAQ de la liste avant de poser une question :
http://wiki.debian.net/?DebianFrench
Vous pouvez aussi ajouter le mot ``spam'' dans vos champs "From" et
"Reply-To:"

To UNSUBSCRIBE, email to
with a subject of "unsubscribe". Trouble? Contact

[HS] Couper les lignes automatiquement sous emacs

7 réponses

Veuillez sélectionner un problème