\newif\ifisamarkup controls spacing of isabeginpar;
authorwenzelm
Sun, 21 Oct 2001 19:42:53 +0200
changeset 11863 87643169ae7d
parent 11862 03801fd2f8fc
child 11864 371ce685b0ec
\newif\ifisamarkup controls spacing of isabeginpar;
lib/texinputs/isabelle.sty
--- a/lib/texinputs/isabelle.sty	Sun Oct 21 19:42:24 2001 +0200
+++ b/lib/texinputs/isabelle.sty	Sun Oct 21 19:42:53 2001 +0200
@@ -29,7 +29,7 @@
 \newdimen\isa@parindent\newdimen\isa@parskip
 
 \newenvironment{isabellebody}{%
-\par%
+\isamarkuptrue\par%
 \isa@parindent\parindent\parindent0pt%
 \isa@parskip\parskip\parskip0pt%
 \isastyle}{\par}
@@ -95,7 +95,8 @@
 \newcommand{\isamarkupsubsect}[1]{\subsection{#1}}
 \newcommand{\isamarkupsubsubsect}[1]{\subsubsection{#1}}
 
-\newcommand{\isabeginpar}{\par\medskip}
+\newif\ifisamarkup
+\newcommand{\isabeginpar}{\par\ifisamarkup\relax\else\medskip\fi}
 \newcommand{\isaendpar}{\par\medskip}
 \newenvironment{isapar}{\parindent\isa@parindent\parskip\isa@parskip\isabeginpar}{\isaendpar}
 \newenvironment{isamarkuptext}{\isastyletext\begin{isapar}}{\end{isapar}}