Mi sa che non mi sono spiegata bene, l’unica cosa che dovrebbe essere in greco della sigla CL é la L (CLambda).
Riporto di seguito i due preamboli. Questo é quello senza teubner:
`\documentclass[10pt]{article}
\usepackage[greek, latin]{babel}
\languageattribute{greek}{polutoniko}
\DeclareRobustCommand{\greco}[ 1 ]{%
\begin{otherlanguage*}{greek}#1 \end{otherlanguage*}}
\usepackage{ledmac}
\makeatletter
\renewcommand*{\para@vfootnote}[2]{%
\insert\csname #1footins\endcsname
\bgroup
\notefontsetup
\interlinepenalty=\csname inter#1footnotelinepenalty\endcsname
\floatingpenalty=\@MM
\splittopskip=\ht\strutbox \splitmaxdepth=\dp\strutbox
\leftskip=\z@skip \rightskip=\z@skip
\l@dparsefootspec #2\ledplinenumtrue % new from here
\ifnum\@nameuse{previous@#1@number}=\l@dparsedstartline\relax
\ledplinenumfalse
\fi
\ifnum\previous@page=\l@dparsedstartpage\relax
\else \ledplinenumtrue \fi
\ifnum\l@dparsedstartline=\l@dparsedendline\relax
\else \ledplinenumtrue \fi
\expandafter\xdef\csname previous@#1@number\endcsname{\l@dparsedstartline}
\xdef\previous@page{\l@dparsedstartpage} % to here
\setbox0=\vbox{\hsize=\maxdimen
\noindent\csname #1footfmt\endcsname#2}%
\setbox0=\hbox{\unvxh0}%
\dp0=0pt
\ht0=\csname #1footfudgefactor\endcsname\wd0
\box0
\penalty0
\egroup
}
\footparagraph{A}
\footparagraph{B}
\renewcommand{\notenumfont}{\footnotesize}
\newcommand{\notetextfont}{\footnotesize}
%\addtolength{\skip\Afootins}{1.5mm}
%\addtolength{\skip\Bfootins}{1.5mm}
%\count\Afootins=825
%\count\Bfootins=825
\newcommand{\abb}[1]{#1%
\let\rbracket\nobrak\relax}
\newcommand{\nobrak}{\textnormal{}}
\newcommand{\morenoexpands}{%
\let\abb=0%
}
\newcommand{\Aparafootfmt}[3]{%
\normal@pars\scriptsize
\parindent=0pt \parfillskip=0pt plus1fil
\notenumfont\printlines#1|\enspace
% \lemmafont#1|#2\enskip
\notetextfont
#3\penalty-10\hskip 1em plus 4em minus.4em\relax
}
\newcommand{\Bparafootfmt}[3]{%
\normal@pars\scriptsize
\parindent=0pt \parfillskip=0pt plus1fil
\notenumfont\printlines#1|%
\ifledplinenum
\enspace%
\else
{\hskip 0em plus0em minus.4em}%
\fi
\select@lemmafont#1|#2\rbracket\enskip
\notetextfont
#3\penalty-10\hskip 1em plus 4em minus.4em\relax }
\newcommand*{\previous@A@number}{-1}
\newcommand*{\previous@page}{-1}
\makeatother
\let\Afootfmt=\Aparafootfmt
\emergencystretch40pt
\author{}
\title{}
\date{}
\begin{document}
\thispagestyle{empty}
\begin{minipage}{0.95\textwidth}
`
Il greco nel testo é leggibile, il greco nelle note no.[/quote]
Questo il codice con Teubner. Ci ho un po’pasticciato ieri sera con una mia amica e adesso sembra non dare niente (anche se non mi appare alcun messaggio di errore).
`% !TEX encoding = UTF-8 Unicode
\documentclass[10pt]{article}
\usepackage[greek, latin]{babel}
\usepackage[boldLipsian]{teubner}
\newcommand\greco[1]{{\textLipsias{#1}}}
\usepackage{ledmac}
\makeatletter
\renewcommand*{\para@vfootnote}[2]{%
\insert\csname #1footins\endcsname
\bgroup
\notefontsetup
\interlinepenalty=\csname inter#1footnotelinepenalty\endcsname
\floatingpenalty=\@MM
\splittopskip=\ht\strutbox \splitmaxdepth=\dp\strutbox
\leftskip=\z@skip \rightskip=\z@skip
\l@dparsefootspec #2\ledplinenumtrue % new from here
\ifnum\@nameuse{previous@#1@number}=\l@dparsedstartline\relax
\ledplinenumfalse
\fi
\ifnum\previous@page=\l@dparsedstartpage\relax
\else \ledplinenumtrue \fi
\ifnum\l@dparsedstartline=\l@dparsedendline\relax
\else \ledplinenumtrue \fi
\expandafter\xdef\csname previous@#1@number\endcsname{\l@dparsedstartline}
\xdef\previous@page{\l@dparsedstartpage} % to here
\setbox0=\vbox{\hsize=\maxdimen
\noindent\csname #1footfmt\endcsname#2}%
\setbox0=\hbox{\unvxh0}%
\dp0=0pt
\ht0=\csname #1footfudgefactor\endcsname\wd0
\box0
\penalty0
\egroup
}
\footparagraph{A}
\footparagraph{B}
\renewcommand{\notenumfont}{\footnotesize}
\newcommand{\notetextfont}{\footnotesize}
%\addtolength{\skip\Afootins}{1.5mm}
%\addtolength{\skip\Bfootins}{1.5mm}
%\count\Afootins=825
%\count\Bfootins=825
\newcommand{\abb}[1]{#1%
\let\rbracket\nobrak\relax}
\newcommand{\nobrak}{\textnormal{}}
\newcommand{\morenoexpands}{%
\let\abb=0%
}
\newcommand{\Aparafootfmt}[3]{%
\normal@pars\scriptsize
\parindent=0pt \parfillskip=0pt plus1fil
\notenumfont\printlines#1|\enspace
% \lemmafont#1|#2\enskip
\notetextfont
#3\penalty-10\hskip 1em plus 4em minus.4em\relax
}
\newcommand{\Bparafootfmt}[3]{%
\normal@pars\scriptsize
\parindent=0pt \parfillskip=0pt plus1fil
\notenumfont\printlines#1|%
\ifledplinenum
\enspace%
\else
{\hskip 0em plus0em minus.4em}%
\fi
\select@lemmafont#1|#2\rbracket\enskip
\notetextfont
#3\penalty-10\hskip 1em plus 4em minus.4em\relax }
\newcommand*{\previous@A@number}{-1}
\newcommand*{\previous@page}{-1}
\makeatother
\let\Afootfmt=\Aparafootfmt
\emergencystretch40pt
\author{}
\title{}
\date{}
\begin{document}
\thispagestyle{empty}
\begin{minipage}{0.95\textwidth}`
Sono proprio negata per queste cose, credo di aver letto i manuali sia di Teubner che di Ledmac almeno sei volte e ci ho capito comunque poco.