Eliminace svisle mezery podle nasledujiciho (plain)

[Marek Pomp]

Pekny den,
na odstraneni prvni odstavcove zarazky po nadpisu pouzijte
v definici nadpisu

\everypar{\setbox0\lastbox\global\everypar{}}

Detailnejsi vysvetleni v TBN.
m.p.

On Wed, 10 Mar 2004, Josef [iso-8859-1] Polách wrote:

> Zdravim vsechny,
>
> V definici nadpisu logickych celku pouzivam bezne
>
> \removelastskip
> ...nejaky vskip pred
> ...Nadpis
> ...nejaky vskip za
> \noindent %protoze chci prvni odstanec bez odsazeni.
>
> Kdyz se ale za nadpisem vyskytne bezprostredne podnadpis celku nizsi urovne
> (definovany podobne), kvuli tomu \noindent nefunguje \removelastskip a mezi
> nadpisy je nezadouci (prilis velka) mezera.
>
> Zkousel jsem otestovat, cim bude zacinat dalsi odstavec (\ nebo pismeno)
> pomoci \futurelet (TBN 367), ale niceho jsem nedosahl.
>
> ukazka:
> def\mac{\futurelet \nextchar \doaction}
> \def\doaction{\ifx \char92\nextchar\let\next=\relax % nechci nic, aby mohl
>                                                     % fungovat \nasledujici
>                                                     % \removelastskip
>                    \else\let\next=\noindent         % chci noindent
>                    \fi\next}
>
> A do definice nadpisu jsem dal:
>
> ...Nadpis
> \medskip\mac}
>
> Nesetkali jste se s tim? Neni nejake jednodussi reseni? Co delam blbe?
>
> Dik za kazdy tip.
>
> Pohoda, hezky den
>
> Josef
>
> --
> Josef Polách, http://www.polach.org
> -------------------
>