From 7ec36f11bad5dae3f22b46e998e0c8e1bf51d104 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 20 Nov 2019 22:08:43 +0000 Subject: gbt7714 (20nov19) git-svn-id: svn://tug.org/texlive/trunk@52870 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/bibtex/bst/gbt7714/gbt7714-unsrt.bst | 14 +++++--------- 1 file changed, 5 insertions(+), 9 deletions(-) (limited to 'Master/texmf-dist/bibtex/bst/gbt7714/gbt7714-unsrt.bst') diff --git a/Master/texmf-dist/bibtex/bst/gbt7714/gbt7714-unsrt.bst b/Master/texmf-dist/bibtex/bst/gbt7714/gbt7714-unsrt.bst index 802e5e66e4c..0fbf2e03a8e 100644 --- a/Master/texmf-dist/bibtex/bst/gbt7714/gbt7714-unsrt.bst +++ b/Master/texmf-dist/bibtex/bst/gbt7714/gbt7714-unsrt.bst @@ -8,7 +8,7 @@ %% ------------------------------------------------------------------- %% GB/T 7714-2015 BibTeX Style %% https://github.com/CTeX-org/gbt7714-bibtex-style -%% Version: 2019/03/21 v1.1.1 +%% Version: 2019/11/20 v1.1.2 %% ------------------------------------------------------------------- %% Copyright (C) 2016-2019 by Zeping Lee %% ------------------------------------------------------------------- @@ -615,19 +615,15 @@ FUNCTION {make.full.names} FUNCTION {output.bibitem} { newline$ "\bibitem[" write$ - label write$ - ")" make.full.names duplicate$ short.list = + label ")" * + make.full.names duplicate$ short.list = { pop$ } { * } if$ 's := s text.length$ 'charptr := - { charptr #0 > } - { s charptr #1 substring$ "]" = - { #0 'charptr := } - { charptr #1 - 'charptr := } - if$ - } + { charptr #0 > s charptr #1 substring$ "[" = not and } + { charptr #1 - 'charptr := } while$ charptr #0 > { "{" s * "}" * } -- cgit v1.2.3