tugboat (12mar20)

git-svn-id: svn://tug.org/texlive/trunk@54261 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 14 insertions, 4 deletions

diff --git a/Master/texmf-dist/bibtex/bst/tugboat/tugboat.bst b/Master/texmf-dist/bibtex/bst/tugboat/tugboat.bst
index 3be31fa97eb..57831f4832d 100644
--- a/Master/texmf-dist/bibtex/bst/tugboat/tugboat.bst
+++ b/Master/texmf-dist/bibtex/bst/tugboat/tugboat.bst
@@ -1,4 +1,4 @@
-%%% $Id: tugboat.bst 261 2019-11-09 22:00:31Z karl $
+%%% $Id: tugboat.bst 271 2020-01-13 19:13:12Z karl $
 %%% TUGboat changes are public domain.
 %%% 
 %%% Modified for TUGboat from abbrvurl.bst:
@@ -10,7 +10,8 @@
 %%%   Reduce long author lists in format.names per Mico Loretan.
 %%%   New fields for editors:
 %%%     "newpage" - force page break after entry;
-%%%     "urlnewline" - force line break before url value.
+%%%     "urlnewline" - force line break before url value;
+%%%     "journaltie" - ~ instead of space after journal name.
 %%% --karl, originally created 24jul18.
 %%% 
 %%% Modification of BibTeX style file /usr/local/texlive/2009/texmf-dist/bibtex/bst/base/abbrv.bst
@@ -61,8 +62,9 @@ ENTRY
     pubmed % urlbst
     url % urlbst
     lastchecked % urlbst
-    newpage % tub
+    newpage    % tub
     urlnewline % tub
+    journaltie % tub
   }
   {}
   { label }
@@ -150,15 +152,23 @@ STRINGS { s t last.output.check }
 
 % urlbst
 % arg on stack is what needs to be written.
+% 
 % If a journal, we want to omit the following comma, as in
 % "TUGboat 39(1)" instead of the default "TUGboat, 39(1)".
 % 
+% Furthermore, if field journaltie is non-empty, output a tie after the
+% journal name instad of a space.
+% 
 FUNCTION {output.nonnull.original}
 { 's :=
   output.state mid.sentence =
     { last.output.check "journal" = not
         { ", " * }
-        {  " " *}
+        { journaltie empty$ not
+          { "~" * }
+          { " " * }
+          if$
+        }
       if$
       write$
     }