Несколько ссылок на одну и ту же сноску на странице с несколькими наборами сносок

Question

Хорошо, теперь я понимаю, что "дубликаты сносок" - это "сноски с одинаковым содержанием". Лучший способ решить вашу проблему - сохранить сноски в списке. Затем, перед тем как вставлять сноску, вы можете проверить, есть ли она уже в списке.

Для того, чтобы перезапустить на каждой странице, вы должны префиксить сохраненное значение номером страницы. Чтобы получить его, вы будете использовать механизм crossref reledmac, чтобы получить номер страницы. Каждая сноска, набранная или нет, имеет уникальный идентификатор, сохраненный в onlyonefootnoteBсчетчике, увеличивающийся на каждой сноске (набранной или нет). Это позволяет нам иметь автоматическую систему перекрестных ссылок.

Для управления списком можно использовать инструмент, предоставляемый etoolboxпакетом, который reledmac load.

То есть

\let\footnoteBlist\relax%Declare a list
\newcounter{onlyonefootnoteB}%Declare a counter to have unique id
\newcommand{\onlyonefootnoteB}[1]{%The command to be call instead of \footnoteB
  \addtocounter{onlyonefootnoteB}{1}%Increase counter value
  \edlabel{B:\theonlyonefootnoteB}%put crossref label
  \xifinlist{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}{\footnoteBlist}%Make test
  {}%True : does nothing
  {%False : add to the list + add footnote
    \listxadd{\footnoteBlist}{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}%
    \footnoteB{#1}%
  }%
}

Обратите внимание, что мы используем \detokenize, чтобы избежать проблем с переключением функций шрифта.

Наконец, наш окончательный код будет выглядеть так:

\documentclass[12pt]{book}
\usepackage[papersize={6.5in,9.5in},margin=1in,headheight=28pt]{geometry}
\usepackage{layout} % shows you the layout composition of the pages.

\usepackage{fontspec}
\usepackage{reledmac}
\usepackage[polutonikogreek]{babel}
\usepackage{setspace}
\usepackage{etoolbox}
\usepackage{fancyhdr}
\usepackage{perpage} %the perpage package


%footnote sets arrangement
\arrangementX[A]{paragraph}
\arrangementX[B]{twocol}
\colalignX{\justifying}
\makeatletter
\bhooknoteX[A]{\setstretch {\setspace@singlespace}}
\bhookgroupX[A]{\setstretch {\setspace@singlespace}}
\makeatother
\let\footnote\footnoteA
\let\footnoteruleA=\relax
\let\footnoteruleB=\relax
\renewcommand{\thefootnoteA}{\roman{footnote}}
%\usepackage{microtype} % I guess this one is optional
\interfootnotelinepenalty=10000
\setmainfont{Palatino Linotype}
\setsansfont{Gill Sans Std}[
Scale=MatchLowercase,
]
\setmonofont{Andale Mono}[
Scale=MatchLowercase,
]

%This makes the footnote numbering restart for every page
\MakePerPage{footnoteB} %the perpage package command
\let\footnoteBlist\relax%Declare a list
\newcounter{onlyonefootnoteB}%Declare a counter to have unique id
\newcommand{\onlyonefootnoteB}[1]{%The command to be call instead of \footnoteB
  \addtocounter{onlyonefootnoteB}{1}%Increase counter value
  \edlabel{B:\theonlyonefootnoteB}%put crossref label
  \xifinlist{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}{\footnoteBlist}%Make test
  {}%True : does nothing
  {%False : add to the list + add footnote
    \listxadd{\footnoteBlist}{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}%
    \footnoteB{#1}%
  }%
}


\begin{document}
    \selectlanguage{greek}

    \chapter*{ΚΑΤΑ ΙΩΑΝΝΗΝ}

    \thispagestyle{empty}

    1 Ἐν\onlyonefootnoteB{A} ἀρχῇ ἦν\onlyonefootnoteB{A} ὁ λόγος, καὶ ὁ λόγος ἦν πρὸς τὸν θεόν, καὶ θεὸς ἦν ὁ λόγος. 2 Οὗτος ἦν ἐν ἀρχῇ πρὸς τὸν θεόν. 3 Πάντα δι’ αὐτοῦ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} καὶ χωρὶς αὐτοῦ ἐγένετο\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} οὐδὲ ἓν ὃ γέγονεν.\onlyonefootnoteB{γίνομαι 3s pf act ind come to exist} 4 Ἐν αὐτῷ ζωὴ ἦν, καὶ ἡ ζωὴ ἦν τὸ φῶς τῶν ἀνθρώπων, 55αὶ τὸ φῶς ἐν τῇ σκοτίᾳ\onlyonefootnoteB{σκοτία, ας, ἡ f darkness; fig. evil world} φαίνει, καὶ ἡ σκοτία\onlyonefootnoteB{σκοτία, ας, ἡ f darkness; fig. evil world} αὐτὸ οὐ κατέλαβεν. 6 Ἐγένετο ἄνθρωπος ἀπεσταλμένος παρὰ θεοῦ, ὄνομα αὐτῷ Ἰωάννης. 7 Οὗτος ἦλθεν\onlyonefootnoteB{ἔρχομαι 3s 2aor act ind. appear} εἰς μαρτυρίαν, ἵνα μαρτυρήσῃ περὶ τοῦ φωτός, ἵνα πάντες πιστεύσωσιν δι’ αὐτοῦ. 8 Οὐκ ἦν ἐκεῖνος τὸ φῶς, ἀλλ’ ἵνα μαρτυρήσῃ περὶ τοῦ φωτός. 9 Ἦν τὸ φῶς τὸ ἀληθινόν,\onlyonefootnoteB{ἀληθινός, ή, όν genuine, authentic, real} ὃ φωτίζει\onlyonefootnoteB{φωτίζω 3s pres act ind enlighten} πάντα ἄνθρωπον ἐρχόμενον\onlyonefootnoteB{ἔρχομαι pres mid or pas part ac s m come} εἰς τὸν κόσμον. 10 Ἐν τῷ κόσμῳ ἦν, καὶ ὁ κόσμος δι’ αὐτοῦ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} καὶ ὁ κόσμος αὐτὸν οὐκ ἔγνω. 11 Εἰς τὰ ἴδια ἦλθεν,\onlyonefootnoteB{ἔρχομαι 3s 2aor act ind. come} καὶ οἱ ἴδιοι αὐτὸν οὐ παρέλαβον. 12 Ὅσοι δὲ ἔλαβον αὐτόν, ἔδωκεν αὐτοῖς ἐξουσίαν τέκνα θεοῦ γενέσθαι,\onlyonefootnoteB{γίνομαι 2aor mid inf become} τοῖς πιστεύουσιν εἰς τὸ ὄνομα αὐτοῦ· 13 οἳ οὐκ ἐξ αἱμάτων, οὐδὲ ἐκ θελήματος σαρκός, οὐδὲ ἐκ θελήματος ἀνδρός, ἀλλ’ ἐκ θεοῦ ἐγεννήθησαν.\onlyonefootnoteB{γεννάω 3p aor pas ind beget} 14 Καὶ ὁ λόγος σὰρξ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind become} καὶ ἐσκήνωσεν ἐν ἡμῖν καὶ ἐθεασάμεθα\onlyonefootnoteB{θεάομαι 1p aor mid ind behold} τὴν δόξαν αὐτοῦ, δόξαν ὡς μονογενοῦς\onlyonefootnoteB{μονογενής, ές unique, only; only begotten} παρὰ πατρός πλήρης\onlyonefootnoteB{πλήρης, ες filled, full} χάριτος καὶ ἀληθείας. 15 Ἰωάννης μαρτυρεῖ περὶ αὐτοῦ, καὶ κέκραγεν\onlyonefootnoteB{κράζω 3s pf act ind come} λέγων, Οὗτος ἦν ὃν εἶπον, Ὁ ὀπίσω μου ἐρχόμενος\onlyonefootnoteB{ἔρχομαι pf mid or pas part nom s m come} ἔμπροσθέν μου γέγονεν·\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} ὅτι πρῶτός μου ἦν. 16 Καὶ ἐκ τοῦ πληρώματος\onlyonefootnoteB{πλήρωμα, ατος, τό n sum total, fullness} αὐτοῦ ἡμεῖς πάντες ἐλάβομεν,\onlyonefootnoteB{receive} καὶ χάριν ἀντὶ\onlyonefootnoteB{ἀντί prep in place of} χάριτος. 17 Ὅτι ὁ νόμος διὰ Μωσέως ἐδόθη,\onlyonefootnoteB{δίδωμι 3s aor pas ind grant} ἡ χάρις καὶ ἡ ἀλήθεια διὰ Ἰησοῦ χριστοῦ ἐγένετο.\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come} 18 Θεὸν οὐδεὶς ἑώρακεν πώποτε·\onlyonefootnoteB{πώποτε adv ever, at any time} ὁ μονογενὴς\onlyonefootnoteB{μονογενής, ές unique, only; only begotten} υἱός, ὁ ὢν εἰς τὸν κόλπον\onlyonefootnoteB{κόλπος, ου, ὁ m bosom, breast, chest} τοῦ πατρός, ἐκεῖνος ἐξηγήσατο.\onlyonefootnoteB{ἐξηγέομαι 3s aor mid ind expound}

    19 Καὶ αὕτη ἐστὶν ἡ μαρτυρία τοῦ Ἰωάννου, ὅτε ἀπέστειλαν οἱ Ἰουδαῖοι ἐξ Ἱεροσολύμων ἱερεῖς καὶ Λευΐτας\onlyonefootnoteB{Λευΐτης m Levite} ἵνα ἐρωτήσωσιν αὐτόν, Σὺ τίς εἶ; 20 αὶ ὡμολόγησεν,\onlyonefootnoteB{ὁμολογέω 3s aor act ind declare} καὶ οὐκ ἠρνήσατο·\onlyonefootnoteB{ἀρνέομαι 3s aor mid ind deny} καὶ ὡμολόγησεν\onlyonefootnoteB{ὁμολογέω 3s aor act ind declare} ὅτι Οὐκ εἰμὶ ἐγὼ ὁ χριστός. 21 Καὶ ἠρώτησαν αὐτόν, Τί οὖν; Ἠλίας εἶ σύ; Καὶ λέγει, Οὐκ εἰμί. Ὁ προφήτης εἶ σύ; Καὶ ἀπεκρίθη,\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} Οὔ. 22 Εἶπον οὖν αὐτῷ, Τίς εἶ; Ἵνα ἀπόκρισιν\onlyonefootnoteB{ἀπόκρισις, εως, ἡ f answer} δῶμεν\onlyonefootnoteB{δίδωμι  give} τοῖς πέμψασιν ἡμᾶς. Τί λέγεις περὶ σεαυτοῦ; 23 Ἔφη, Ἐγὼ φωνὴ βοῶντος\onlyonefootnoteB{βοάω pres actv part s gen m call, shout, cry out} ἐν τῇ ἐρήμῳ, Εὐθύνατε\onlyonefootnoteB{εὐθύνω 2p aor act straighten, make straight} τὴν ὁδὸν κυρίου, καθὼς εἶπεν Ἠσαΐας ὁ προφήτης. 24 Καὶ οἱ ἀπεσταλμένοι ἦσαν ἐκ τῶν Φαρισαίων. 25 Καὶ ἠρώτησαν αὐτόν, καὶ εἶπον αὐτῷ, Τί οὖν βαπτίζεις, εἰ σὺ οὐκ εἶ ὁ χριστός, οὔτε Ἠλίας, οὔτε ὁ προφήτης; 26 Ἀπεκρίθη\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} αὐτοῖς ὁ Ἰωάννης λέγων, Ἐγὼ βαπτίζω ἐν ὕδατι· μέσος δὲ ὑμῶν ἕστηκεν ὃν ὑμεῖς οὐκ οἴδατε.\onlyonefootnoteB{A}
    \newpage
    \begin{itemize}
      \renewcommand*{\do}[1]{\item #1}%
        \dolistloop{\footnoteBlist}%
    \end{itemize}
\end{document}

Код после финала newpageпоказывает нам список набранных сносок.

Обратите внимание, что поскольку мы используем инструменты crossref, вам понадобится несколько запусков. Используйте latexmkили аналогичные инструменты, чтобы получить необходимое количество запусков. В этом MWE их было 3, но я мог бы использовать больше для реального случая.

Answer 1