Code : Tout sélectionner
\documentclass[a4paper,10pt]{article}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage{lmodern}
\usepackage[frenchb]{babel}
\usepackage[a4paper]{geometry}
\geometry{hscale=0.85,vscale=0.85,centering}
\usepackage{calc}
%
\renewcommand{\baselinestretch}{2}
%
\newenvironment{enva}{
\newcommand{\widthsq}{\textwidth-2ex}
\begin{flushright}
\begin{minipage}[t]{\widthsq}}{
\end{minipage}
\end{flushright}}
%
\newenvironment{envb}{
\newcommand{\widthsq}{\textwidth-4ex}
\begin{flushright}
\vspace{-0.35\baselineskip}
\begin{minipage}[t]{\widthsq}}{
\end{minipage}
\end{flushright}}
%
\begin{document}
\begin{enva}
Un texte de l'environnement 'a' qui fait moins d'une ligne.
\end{enva}
\begin{enva}
Un texte de l'environnement 'a' qui fait moins d'une ligne.
\end{enva}
\begin{envb}
Un texte de l'environnement 'b' qui fait moins d'une ligne (peu importe en fait).
\end{envb}
\begin{envb}
Un texte de l'environnement 'b' qui fait moins d'une ligne (peu importe en fait).
\end{envb}
\begin{enva}
Un texte de l'environnement 'a' qui fait moins d'une ligne. On remarque que l'environnement 'b' suivant n'est pas espacé de l'environnement 'a' comme les autres. L'espacement est (un peu) plus court.
\end{enva}
% Ici, l'espacement ne convient pas.
\begin{envb}
Un texte de l'environnement 'b' qui fait moins d'une ligne (peu importe en fait).
\end{envb}
\begin{envb}
Un texte de l'environnement 'b' qui fait moins d'une ligne (peu importe en fait).
\end{envb}
\end{document}