Mercurial > hgrepos > hgweb.cgi > yatex

comparison yatex.el @ 589:921d58902dca draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix function document.
author HIROSE Yuuji <yuuji@gentei.org>
date Fri, 23 Sep 2022 06:29:04 +0900
parents 91a6b97d01fa
children 923a6c0183be
comparison
equal deleted inserted replaced
588:44c9b313c68d 589:921d58902dca
1 ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*- 1 ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*-
2 ;;; (c)1991-2020 by HIROSE Yuuji.[yuuji@yatex.org] 2 ;;; (c)1991-2020 by HIROSE Yuuji.[yuuji@yatex.org]
3 ;;; Last modified Wed Sep 21 11:07:10 2022 on firestorm 3 ;;; Last modified Fri Sep 23 06:28:18 2022 on firestorm
4 ;;; $Id$ 4 ;;; $Id$
5 ;;; The latest version of this software is always available at; 5 ;;; The latest version of this software is always available at;
6 ;;; https://www.yatex.org/ 6 ;;; https://www.yatex.org/
7 7
8 ;;; This program is distributed as a free software. You can 8 ;;; This program is distributed as a free software. You can
327 ("frametitle") ("framesubtitle") ;; beamer 327 ("frametitle") ("framesubtitle") ;; beamer
328 ("subfigure") ;; subfigure 328 ("subfigure") ;; subfigure
329 ("ruby" 2) ("kenten") ;; okumacro 329 ("ruby" 2) ("kenten") ;; okumacro
330 ("geometry") ("path") 330 ("geometry") ("path")
331 ("setstretch") 331 ("setstretch")
332 ("columncolor") ("rowcolor") ("cellcolor") ;; colortbl
332 ) 333 )
333 (if YaTeX-use-LaTeX2e 334 (if YaTeX-use-LaTeX2e
334 '(("documentclass") ("usepackage") 335 '(("documentclass") ("usepackage")
335 ("textbf") ("textgt") ("textit") ("textmc") ("textmd") ("textnormal") 336 ("textbf") ("textgt") ("textit") ("textmc") ("textmd") ("textnormal")
336 ("textrm") ("textsc") ("textsf") ("textsl") ("texttt") ("textup") 337 ("textrm") ("textsc") ("textsf") ("textsl") ("texttt") ("textup")
881 882
882 ;;; 883 ;;;
883 ;; YaTeX-mode functions 884 ;; YaTeX-mode functions
884 ;;; 885 ;;;
885 (defun YaTeX-insert-begin-end (env region-mode) 886 (defun YaTeX-insert-begin-end (env region-mode)
886 "Insert \\begin{mode-name} and \\end{mode-name}. 887 "Insert \\begin{env-name} and \\end{env-name}.
887 This works also for other defined begin/end tokens to define the structure." 888 This works also for other defined begin/end tokens to define the structure."
888 (setq YaTeX-current-completion-type 'begin) 889 (setq YaTeX-current-completion-type 'begin)
889 (let*((ccol (current-column)) beg beg2 exchange 890 (let*((ccol (current-column)) beg beg2 exchange
890 (arg region-mode) ;for old compatibility 891 (arg region-mode) ;for old compatibility
891 (indent-column (+ ccol YaTeX-environment-indent))(i 1) func) 892 (indent-column (+ ccol YaTeX-environment-indent))(i 1) func)

yatex.org