%
% Usage: \linespace
%
% Puts a blank space between paragraphs. However, when it's near a page
% boundary, it will put a line to indicate the break across pages.
%
\ProvidesPackage{linespace}[2004/03/30 Line space between paragraphs]

\newskip\linespaceskip
\def\setlinespace{\linespaceskip=1\baselineskip\@plus0.5\baselineskip}
\setlinespace
\def\linespace{%
    \par
    \ifinner
	% Better be in inner vertical mode
	\ifhmode\errmessage{You can't use linespace in LR mode.}\fi
	\vskip\linespaceskip
    \else
	% Now we're in outer vertical mode, need to do funny stuff
	\@outerlinespace
    \fi
}
\def\@outerlinespace{% The par was already inserted
    \penalty\lastpenalty % Force the page bulder (no overfull page)
    \begingroup
    \@tempdima\pagegoal \advance\@tempdima-\pagetotal
    \ifdim\@tempdima<2\baselineskip
	\advance\linespaceskip-\baselineskip % Temporary!
	\hskip \linespaceskip
	\noindent\hbox{\raise 0.6\fontdimen5\font
	            \hb@xt@\hsize{\hfil\leaders\hrule\hfil\hfil}%
	}%
	\advance\linespaceskip-\baselineskip % This or the first is killed
    \else
	\vskip\linespaceskip
	\penalty\@M
    \fi
    \endgroup
}

\endinput