Précédent   Forum du club des développeurs et IT Pro > Autres langages > Langages fonctionnels > Lisp
Lisp Forum d'entraide sur la programmation en langages fonctionnels Lisp et Common Lisp
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse
 
Outils de la discussion
Publicité
'
Vieux 02/04/2011, 17h03   #1
crespo12
Invité de passage
 
Homme
Enseignant
Inscription : mars 2011
Messages : 6
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Activité : Enseignant

Informations forums :
Inscription : mars 2011
Messages : 6
Points : 2
Points : 2
Par défaut emacs fonction personnalisée avec isearch-backward

Bonjour,

je cherche à écrire une fonction personnelle pour obtenir le résultat suivant (mettre en majuscule le premier mot du titre et sauter une ligne):

------------------------------------------------------------
\section{un titre}
------------------------------------------------------------

résultat après appel fonction
------------------------------------------------------------
\section{Un titre}


------------------------------------------------------------

Je comptais utiliser le code suivant:

(defun valid-sec () ""(interactive)
(isearch-backward "\{")
(capitalize-word 1)
(move-end-of-line)
(insert "\n\n") )

mais isearch-backward me demande intéractivement son argument: je ne vois pas comment lui indiquer dans mon code...

D'autre part j'ai enregistré une macro qui fait la partie isearch-backward "\{", mais je ne sais pas comment utiliser le code généré:

(fset 'essai
"\C-r{")

Merci.
crespo12 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 04/04/2011, 15h50   #2
jack-ft
Membre Expert
 
Inscription : avril 2008
Messages : 794
Détails du profil
Informations forums :
Inscription : avril 2008
Messages : 794
Points : 1 800
Points : 1 800
Citation:
Envoyé par crespo12 Voir le message
Bonjour,

je cherche à écrire une fonction personnelle pour obtenir le résultat suivant (mettre en majuscule le premier mot du titre et sauter une ligne):

------------------------------------------------------------
\section{un titre}
------------------------------------------------------------

résultat après appel fonction
------------------------------------------------------------
\section{Un titre}


------------------------------------------------------------

Je comptais utiliser le code suivant:

(defun valid-sec () ""(interactive)
(isearch-backward "\{")
(capitalize-word 1)
(move-end-of-line)
(insert "\n\n") )

mais isearch-backward me demande intéractivement son argument: je ne vois pas comment lui indiquer dans mon code...

D'autre part j'ai enregistré une macro qui fait la partie isearch-backward "\{", mais je ne sais pas comment utiliser le code généré:

(fset 'essai
"\C-r{")

Merci.
Bonjour,

utilise la fonction "search-backward" plutôt que "isearch-backward"

HTH

)jack(
jack-ft est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 05/04/2011, 21h55   #3
crespo12
Invité de passage
 
Homme
Enseignant
Inscription : mars 2011
Messages : 6
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Activité : Enseignant

Informations forums :
Inscription : mars 2011
Messages : 6
Points : 2
Points : 2
Merci beaucoup, c'est exactement ce que je cherchais.
crespo12 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Cette discussion est résolue.
Outils de la discussion

Navigation rapide


Fuseau horaire GMT +2. Il est actuellement 05h06.


 
 
 
 
Partenaires

Hébergement Web