Re: `add-to-list` : factorisation ?

Liste des GroupesRevenir à fca emacs 
Sujet : Re: `add-to-list` : factorisation ?
De : dbitouze (at) *nospam* wanadoo.fr (Denis Bitouzé)
Groupes : fr.comp.applications.emacs
Organisation : A noiseless patient Spider
Date : 14. May 2020, 18:05:21
Message-ID : <87mu6aijsu.fsf@example.com>
References : 1 2
User-Agent : Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux)
Le 14/05/20 à 08h39, Jean-Jacques Rétorré a écrit :

J'aurais proposé
>
(dolist (env LaTeX-verbatim-environments-local (add-to-list
'LaTeX-indent-environment-list (list env current-indentation))))
>
Ça me paraît vraiment trop simple...

En effet. Lancer C-x C-e à la fin des 2 instructions suivantes :

(setq LaTeX-verbatim-environments-local '("truc"
                                           "machin"
                                           "bidule"
                                           ))

(dolist (env LaTeX-verbatim-environments-local (add-to-list
'LaTeX-indent-environment-list (list env current-indentation))))

conduit pour la 2e à :

  ┌────
  │ Debugger entered--Lisp error: (void-variable current-indentation)
  │   (list env current-indentation)
  │   (let* ((x (list env current-indentation))) (if (member x LaTeX-indent-environment-list) LaTeX-indent-environment-list (setq LaTeX-indent-environment-list (cons x LaTeX-indent-environment-list))))
  │   (let ((--dolist-tail-- LaTeX-verbatim-environments-local) env) (while --dolist-tail-- (setq env (car --dolist-tail--)) (setq --dolist-tail-- (cdr --dolist-tail--))) (setq env nil) (let* ((x (list env current-indentation))) (if (member x LaTeX-indent-environment-list) LaTeX-indent-environment-list (setq LaTeX-indent-environment-list (cons x LaTeX-indent-environment-list)))))
  │   eval((let ((--dolist-tail-- LaTeX-verbatim-environments-local) env) (while --dolist-tail-- (setq env (car --dolist-tail--)) (setq --dolist-tail-- (cdr --dolist-tail--))) (setq env nil) (let* ((x (list env current-indentation))) (if (member x LaTeX-indent-environment-list) LaTeX-indent-environment-list (setq LaTeX-indent-environment-list (cons x LaTeX-indent-environment-list))))) nil)
  │   elisp--eval-last-sexp(nil)
  │   eval-last-sexp(nil)
  │   funcall-interactively(eval-last-sexp nil)
  │   call-interactively(eval-last-sexp nil nil)
  │   command-execute(eval-last-sexp)
  └────

Et, là, je dois dire que je n'y entrave que pouic...

Merci en tout cas.
--
Denis

Date Sujet#  Auteur
13.05 * `add-to-list` : factorisation ?8Denis Bitouzé
14.05 `* Re: `add-to-list` : factorisation ?7Jean-Jacques Rétorré
14.05  `* Re: `add-to-list` : factorisation ?6Denis Bitouzé
14.05   `* Re: `add-to-list` : factorisation ?5Jean-Jacques Rétorré
18.05    +- Re: `add-to-list` : factorisation ?1Denis Bitouzé
18.05    `* Re: `add-to-list` : factorisation ?3Denis Bitouzé
20.05     `* Re: `add-to-list` : factorisation ?2Denis Bitouzé
20.05      `- Re: `add-to-list` : factorisation ?1Jean-Jacques Rétorré

Haut de la page

Les messages affichés proviennent d'usenet.

NewsPortal