Suprimir el número del primer verso(s) de un capítulo en el cuerpo del texto pero no en el encabezado

Question

En el siguiente ejemplo, ¿cómo puedo suprimir el número del primer versículo (o versículos como 1-2) de un capítulo de la Biblia en el cuerpo del texto sin suprimirlo en los encabezados? (Esto se basa en el material encontradoaquí.)

\documentclass[12pt,openany,final]{memoir}

\usepackage{libertine}
\usepackage{xcolor}
\usepackage{lettrine}
\usepackage{lipsum}

%%% headers
\makeoddhead{headings}{\rightmark}{}{\thepage}
\makeevenhead{headings}{\thepage}{}{\leftmark}

%remove the marks set by \section.
\addtopsmarks{headings}{}{%
\renewcommand\sectionmark[1]{}
}

%%%%chapter format
\newcommand{\chaplabel}{}
\newcommand{\gnumChapters}{0}

\newcommand{\gChapter}[1]{\lettrine[lines=2,nindent=.5em,findent=0em]{{\textcolor{black}{#1}}}{}\markboth{\chaplabel\ #1:1}{\chaplabel\ #1:1}\renewcommand{\gnumChapters}{#1}}

%%%%verse format
\makeatletter
% define a 'smaller textsuperscript' macro
\DeclareRobustCommand*\textsmallsuperscript[1]{%
\@textsmallsuperscript{\selectfont#1}}
\def\@textsmallsuperscript#1{%
{\m@th\ensuremath{^{\mbox{\fontsize\ssf@size\z@#1}}}}}
\makeatletter

\newcommand{\gverse}[1]{{\textsmallsuperscript{#1}\hspace*{.1em}\ignorespaces\markboth{\chaplabel\ \gnumChapters:#1}{\chaplabel\gnumChapters:#1}}\ignorespaces}

\begin{document}
\gChapter{1}
\gverse{1-2}\lipsum[2]
\gverse{3}\lipsum[3]
\end{document}

Answer 1

Una forma es establecer una marca en la \gchaptermacro y luego probar para detectar el primer uso de \gverseafter \gchapter.

Tenga en cuenta que el reinicio de la bandera ya está hecho.afueraestás duplicado {{...}}; \gversede lo contrario, solo afecta a una copia local de la bandera, ¡lo cual no funciona!

    ...
    %%%%chapter format
    \newcommand{\chaplabel}{}
    \newcommand{\gnumChapters}{0}
    \newif\ifshowverseno

    \newcommand{\gChapter}[1]{\showversenofalse\lettrine[lines=2,nindent=.5em,findent=0em]{{\textcolor{black}{#1}}}{}\markboth{\chaplabel\ #1:1}{\chaplabel\ #1:1}\renewcommand{\gnumChapters}{#1}}

    %%%%verse format
    \makeatletter
    % define a 'smaller textsuperscript' macro
    \DeclareRobustCommand*\textsmallsuperscript[1]{%
    \@textsmallsuperscript{\selectfont#1}}
    \def\@textsmallsuperscript#1{%
    {\m@th\ensuremath{^{\mbox{\fontsize\ssf@size\z@#1}}}}}
    \makeatletter

    \newcommand{\gverse}[1]{{\ifshowverseno\textsmallsuperscript{#1}\hspace*{.1em}\ignorespaces \fi%
       \markboth{\chaplabel\ \gnumChapters:#1}{\chaplabel\gnumChapters:#1}}\showversenotrue\ignorespaces}

    \begin{document}
    ...