{ author.duplicate author.shared }
{ label }
-INTEGERS { output.state before.all mid.sentence after.sentence after.block after.title author.different author.last author.flast citealt.used url.used }
+INTEGERS { output.state before.all mid.sentence after.sentence after.block after.title author.different author.last author.flast citealp.used url.used }
% Rearranged such that true values require capital letters
FUNCTION {init.consts}
#2 'author.flast :=
%#3 'author.firstlast :=
- #0 'citealt.used :=
+ #0 'citealp.used :=
#0 'url.used :=
}
FUNCTION {emphasize}
{ duplicate$ empty$
{ pop$ "" }
- { "{\em " swap$ * "}" * }
+ { "\emph{" swap$ * "}" * }
if$
}
%}
%{ "In " key * }
%if$
- pages empty$ { " \citealt" } { " \citealt[" format.chapter.pages * "]" * } if$
+ pages empty$ { "\citealp" } { "\citealp[" format.chapter.pages * "]" * } if$
"{" * crossref * "}" *
}
% }
% { format.crossref.editor * }
% if$
- pages empty$ { " \citealt" } { " \citealt[" format.chapter.pages * "]" * } if$
+ pages empty$ { "\citealp" } { "\citealp[" format.chapter.pages * "]" * } if$
"{" * crossref * "}" *
}
% }
% { "In " format.crossref.editor * }
% if$
- pages empty$ { " \citealt" } { " \citealt[" format.chapter.pages * "]" * } if$
+ pages empty$ { "\citealp" } { "\citealp[" format.chapter.pages * "]" * } if$
"{" * crossref * "}" *
}
{ author }
if$
duplicate$ empty$
- { pop$ cite.title }
- {
+ { cite.title * "( \ \ \ \ \unskip\unskip\unskip\unskip\unskip \unskip)" * }
+ { duplicate$
author.shared author.different =
- { "{vv~}{ll}" format.names.custom }
+ { "{vv~}{ll}" format.names.custom 's := }
{ author.shared author.last =
- { "{f.~}{vv~}{ll}{, jj}" format.names.custom }
+ { "{f.~}{vv~}{ll}{, jj}" format.names.custom 's := }
{ author.shared author.flast =
- { "{ff~}{vv~}{ll}{, jj}" format.names.custom }
- { "{vv~}{ll}" format.names.custom ", " * cite.title * }
+ { "{ff~}{vv~}{ll}{, jj}" format.names.custom 's := }
+ { "{vv~}{ll}" format.names.custom ", " * cite.title * 's := "WTF" warning$ }
if$
}
if$
}
if$
- author.duplicate { "(" * cite.title * ")" }{ "( )" * } if$
+ s
+ "( \ \ \ \ \unskip\unskip\unskip\unskip\unskip " *
+ author.duplicate { cite.title * }{ "\unskip" * } if$
+ ")" * swap$ "{ff~}{vv~}{ll}{, jj}" format.names.custom *
}
if$
%}
if$
new.block
format.btitle "title" output.check
- new.sentence
+ new.block
crossref missing$
- { author empty$ 'skip$ { format.editors.mid output new.sentence } if$
+ { author empty$ 'skip$ { format.editors.mid output new.block } if$
format.edition output
new.sentence
format.bvolume.or.num.series output
format.btitle "title" output.check
new.block
crossref missing$
- { author empty$ 'skip$ { format.editors.mid output new.sentence } if$
+ { author empty$ 'skip$ { format.editors.mid output new.block } if$
format.edition output
new.sentence
format.bvolume.or.num.series output
booktitle "booktitle" output.check
new.sentence
format.editors.mid output
- new.sentence
+ new.block
format.edition output
new.sentence
format.bvolume.or.num.series output
if$
new.block
format.btitle "title" output.check
- new.sentence
+ new.block
format.edition output
new.sentence
author empty$
FUNCTION {forward.author.dup.check}
{
url empty$ 'skip$ { url.used #1 + 'url.used := } if$
- crossref empty$ 'skip$ { citealt.used #1 + 'citealt.used := } if$
+ crossref empty$ 'skip$ { citealp.used #1 + 'citealp.used := } if$
author empty$
{ editor empty$ { organization field.or.null 'a := }{ editor 'a :=} if$}
{ author 'a := }
FUNCTION {begin.bib}
{
- citealt.used
- { "\ifx\undefined\citealt\let\citealt\cite\fi" write$ newline$ }
+ citealp.used
+ { "\expandafter\ifx\csname citealp\endcsname\relax\let\citealp\cite\fi"
+ write$ newline$ }
'skip$
if$
url.used
- { "\ifx\undefined\url\let\url\relax\fi" write$ newline$ }
+ { "\expandafter\ifx\csname citealp\endcsname\relax\url\let\url\relax\fi"
+ write$ newline$ }
'skip$
if$
preamble$ empty$