diff --git a/yatex.el b/yatex.el
index 6af757b..920f3d3 100644
--- a/yatex.el
+++ b/yatex.el
@@ -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 --git a/yatexadd.el b/yatexadd.el
index b2378c0..40c5a7c 100644
--- a/yatexadd.el
+++ b/yatexadd.el
@@ -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.
 ;;;