# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1638569553 -32400
# Node ID 907de32064c99c25fb49072438be7c1034892af3
# Parent  d4831b3672f87affbb0f7f69135e7824d0bd325b
Add add-in for spacing environment from setspace package

diff -r d4831b3672f8 -r 907de32064c9 yatex.el
--- a/yatex.el	Thu Jul 01 07:00:05 2021 +0900
+++ b/yatex.el	Sat Dec 04 07:12:33 2021 +0900
@@ -1,6 +1,6 @@
 ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*-
 ;;; (c)1991-2020 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Sat Feb  8 18:31:09 2020 on firestorm
+;;; Last modified Tue Nov 30 13:08:54 2021 on firestorm
 ;;; $Id$
 ;;; The latest version of this software is always available at;
 ;;; https://www.yatex.org/
@@ -328,6 +328,7 @@
      ("subfigure")						;; subfigure
      ("ruby" 2) ("kenten")					;; okumacro
      ("geometry") ("path")
+     ("setstretch")
      )
    (if YaTeX-use-LaTeX2e
        '(("documentclass") ("usepackage")
@@ -403,7 +404,7 @@
      ("minipage") ("landscape")
      ("supertabular") ("floatingfigure") ("wrapfigure") ("wraptable")
      ("frame") ("block") ("example") ("columns") ("column")	;beamer
-     ("tabularx")
+     ("tabularx") ("spacing")
      )
    (if YaTeX-use-LaTeX2e
        '(("comment")			;defined in version
diff -r d4831b3672f8 -r 907de32064c9 yatexadd.el
--- a/yatexadd.el	Thu Jul 01 07:00:05 2021 +0900
+++ b/yatexadd.el	Sat Dec 04 07:12:33 2021 +0900
@@ -1,6 +1,6 @@
 ;;; yatexadd.el --- YaTeX add-in functions -*- coding: sjis -*-
 ;;; (c)1991-2019 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Thu Oct 17 09:44:48 2019 on firestorm
+;;; Last modified Sat Dec  4 07:11:07 2021 on firestorm
 ;;; $Id$
 
 ;;; Code:
@@ -306,6 +306,11 @@
 (defun YaTeX:itembox ()
   (concat "{" (YaTeX-read-string-or-skip "Item heading string: ") "}"))
 
+(defun YaTeX:spacing ()
+  (concat "{" (read-string-with-history "Line spacing by: ") "}"))
+(defun YaTeX::setstretch (argp)
+  (read-string-with-history "Page global Line stretch factor: "))
+
 ;;;
 ;;Sample functions for maketitle-type command.
 ;;;