Skip to content
Snippets Groups Projects
Commit b557cfed authored by Philippe Dosch's avatar Philippe Dosch
Browse files

Improve comtex

parent 0e63da93
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 7 additions and 6 deletions
.emacs
+ 7
− 6
View file @ b557cfed
...@@ -924,14 +924,15 @@ ...@@ -924,14 +924,15 @@
;; Une ligne séparatrice de commentaire en LaTeX ;; Une ligne séparatrice de commentaire en LaTeX
(defun comtex () (defun comtex ()
"Add a comment line composed of user giver symbol."
(interactive) (interactive)
(let ((comsymb (read-from-minibuffer "Quel symbole : "))) (let ((comsymb (read-from-minibuffer "Quel symbole : ")))
(insert "%") (insert "% ")
(setq myiter 70) (let ((myiter 70))
(while (> myiter 0) (while (> myiter 0)
(setq myiter (- myiter 1)) (setq myiter (- myiter 1))
(insert comsymb) (insert comsymb)
) ))
(insert "\n") (insert "\n")
) )
) )
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment