From 50c40ff41b83169b6fb7137aeba8baeeaeaa97ab Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sun, 31 Mar 2019 21:42:07 +0000 Subject: bibexport (31mar19) git-svn-id: svn://tug.org/texlive/trunk@50677 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/bibtex/bst/bibexport/expcites.bst | 19 ++++++++++++++----- Master/texmf-dist/bibtex/bst/bibexport/expkeys.bst | 2 +- Master/texmf-dist/bibtex/bst/bibexport/export.bst | 6 +++++- 3 files changed, 20 insertions(+), 7 deletions(-) (limited to 'Master/texmf-dist/bibtex/bst') diff --git a/Master/texmf-dist/bibtex/bst/bibexport/expcites.bst b/Master/texmf-dist/bibtex/bst/bibexport/expcites.bst index 7fde8107e34..11d2a83f0cc 100644 --- a/Master/texmf-dist/bibtex/bst/bibexport/expcites.bst +++ b/Master/texmf-dist/bibtex/bst/bibexport/expcites.bst @@ -6,7 +6,7 @@ %% %% bibexport.dtx (with options: `expcites') %% -%% (c) 2016/03/02 Nicolas Markey +%% (c) 2019/03/30 Nicolas Markey %% %% This work may be distributed and/or modified under the conditions of %% the LaTeX Project Public License, either version 1.3 of this license @@ -65,7 +65,7 @@ FUNCTION{or} } INTEGERS{left.length right.length} STRINGS{ s t } -INTEGERS{bool} +INTEGERS{bool cpt} FUNCTION{space.complete} { 'left.length := @@ -105,12 +105,13 @@ FUNCTION{init.cited.keys} { left.delim 's := #0 'bool := + #0 'cpt := } FUNCTION{write.cited.keys} { bool {"" left.width space.complete swap$} - {" cited keys: " left.width space.complete swap$ + {" list of keys: " left.width space.complete swap$ #1 'bool :=} if$ {duplicate$ text.length$ right.width >} @@ -127,14 +128,14 @@ FUNCTION{write.cited.keys.last} { bool {"" left.width space.complete swap$} - {" cited keys: " left.width space.complete swap$ + {" list of keys: " left.width space.complete swap$ #1 'bool :=} if$ {duplicate$ duplicate$ text.length$ #1 substring$ "," = not} {duplicate$ text.length$ #1 - #1 swap$ substring$} while$ duplicate$ text.length$ #1 - #1 swap$ substring$ - right.delim * + right.delim * "," * {duplicate$ "" = not} { right.width split.string 't := @@ -145,8 +146,15 @@ FUNCTION{write.cited.keys.last} while$ pop$ pop$ } +FUNCTION{write.nbkeys} +{ + " number of entries: " left.width space.complete + " " * + cpt int.to.str$ * "," * write$ newline$ +} FUNCTION{cited.keys} { + cpt #1 + 'cpt := s cite$ ", " * * 's := s text.length$ #4000 > {s write.cited.keys 's :=} @@ -156,6 +164,7 @@ FUNCTION{cited.keys} FUNCTION{end.cited.keys} { s write.cited.keys.last + write.nbkeys } FUNCTION{article}{cited.keys} FUNCTION{book}{cited.keys} diff --git a/Master/texmf-dist/bibtex/bst/bibexport/expkeys.bst b/Master/texmf-dist/bibtex/bst/bibexport/expkeys.bst index 9f7359cc775..52fc7f0472e 100644 --- a/Master/texmf-dist/bibtex/bst/bibexport/expkeys.bst +++ b/Master/texmf-dist/bibtex/bst/bibexport/expkeys.bst @@ -6,7 +6,7 @@ %% %% bibexport.dtx (with options: `expkeys') %% -%% (c) 2016/03/02 Nicolas Markey +%% (c) 2019/03/30 Nicolas Markey %% %% This work may be distributed and/or modified under the conditions of %% the LaTeX Project Public License, either version 1.3 of this license diff --git a/Master/texmf-dist/bibtex/bst/bibexport/export.bst b/Master/texmf-dist/bibtex/bst/bibexport/export.bst index ad9f3e49d34..5bf11481329 100644 --- a/Master/texmf-dist/bibtex/bst/bibexport/export.bst +++ b/Master/texmf-dist/bibtex/bst/bibexport/export.bst @@ -6,7 +6,7 @@ %% %% bibexport.dtx (with options: `export') %% -%% (c) 2016/03/02 Nicolas Markey +%% (c) 2019/03/30 Nicolas Markey %% %% This work may be distributed and/or modified under the conditions of %% the LaTeX Project Public License, either version 1.3 of this license @@ -71,11 +71,13 @@ ENTRY{ acronym annote biburl + bibsource doi eid isbn issn language + timestamp url urn }{}{} @@ -388,11 +390,13 @@ FUNCTION{entry.export.extra} "acronym" acronym field.export "annote" annote field.export "biburl" biburl url.export + "bibsource" bibsource field.export "doi" doi field.export "eid" eid field.export "isbn" isbn field.export "issn" issn field.export "language" language field.export + "timestamp" timestamp field.export "url" url url.export "urn" urn url.export } -- cgit v1.2.3