aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2001-10-27 14:57:00 +0000
committerEli Zaretskii2001-10-27 14:57:00 +0000
commit25cacfa7f0dab73ab4c42b904ef2d8f7c180f482 (patch)
tree3926f7d8736fb7d72c93b7ddfdca42e267d9f3a0
parent7db35a48a8c04d67b107e2adca6cc8be3539b704 (diff)
downloademacs-25cacfa7f0dab73ab4c42b904ef2d8f7c180f482.tar.gz
emacs-25cacfa7f0dab73ab4c42b904ef2d8f7c180f482.zip
No change. Error by bob, not eliz, logging change for wrong file.
-rw-r--r--lisp/textmodes/texinfmt.el11
1 files changed, 10 insertions, 1 deletions
diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index 01f49921b4c..1de77246b28 100644
--- a/lisp/textmodes/texinfmt.el
+++ b/lisp/textmodes/texinfmt.el
@@ -2129,7 +2129,7 @@ This command is executed when texinfmt sees @item inside @multitable."
2129 (setq fill-column existing-fill-column))) 2129 (setq fill-column existing-fill-column)))
2130 2130
2131 2131
2132;;; @ifinfo, @iftex, @tex, @ifhtml, @html, @ifnottex 2132;;; @ifinfo, @iftex, @tex, @ifhtml, @html, @ifnottex, @ifnotinfo, @ifnothtml
2133 2133
2134(put 'ifinfo 'texinfo-format 'texinfo-discard-line) 2134(put 'ifinfo 'texinfo-format 'texinfo-discard-line)
2135(put 'ifinfo 'texinfo-end 'texinfo-discard-command) 2135(put 'ifinfo 'texinfo-end 'texinfo-discard-command)
@@ -2158,9 +2158,18 @@ This command is executed when texinfmt sees @item inside @multitable."
2158 (progn (re-search-forward "@end html[ \t]*\n") 2158 (progn (re-search-forward "@end html[ \t]*\n")
2159 (point)))) 2159 (point))))
2160 2160
2161(put 'ifnotinfo 'texinfo-format 'texinfo-format-ifnotinfo)
2162(defun texinfo-format-ifnotinfo ()
2163 (delete-region texinfo-command-start
2164 (progn (re-search-forward "@end ifnotinfo[ \t]*\n")
2165 (point))))
2166
2161(put 'ifnottex 'texinfo-format 'texinfo-discard-line) 2167(put 'ifnottex 'texinfo-format 'texinfo-discard-line)
2162(put 'ifnottex 'texinfo-end 'texinfo-discard-command) 2168(put 'ifnottex 'texinfo-end 'texinfo-discard-command)
2163 2169
2170(put 'ifnothtml 'texinfo-format 'texinfo-discard-line)
2171(put 'ifnothtml 'texinfo-end 'texinfo-discard-command)
2172
2164 2173
2165;;; @titlepage 2174;;; @titlepage
2166 2175