diff options
author | Karl Berry <karl@freefriends.org> | 2012-02-28 00:36:50 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2012-02-28 00:36:50 +0000 |
commit | e82102b1b98d1452833b3fbe54f7ce7b0e8a219c (patch) | |
tree | 0bd2e83135ba7caede893da79733087844c034a0 /Master/texmf-dist/bibtex/bst | |
parent | eb73e4b0206537b52fa1542a2572854dae55e414 (diff) |
vancouver 1.2 (26feb12)
git-svn-id: svn://tug.org/texlive/trunk@25519 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/bibtex/bst')
-rw-r--r-- | Master/texmf-dist/bibtex/bst/vancouver/vancouver.bst | 50 |
1 files changed, 28 insertions, 22 deletions
diff --git a/Master/texmf-dist/bibtex/bst/vancouver/vancouver.bst b/Master/texmf-dist/bibtex/bst/vancouver/vancouver.bst index 644563ce1dd..bc3fb462066 100644 --- a/Master/texmf-dist/bibtex/bst/vancouver/vancouver.bst +++ b/Master/texmf-dist/bibtex/bst/vancouver/vancouver.bst @@ -11,26 +11,23 @@ %% %%------------------------------------------------------------------- %% -%% Copyleft 2004 Folkert van der Beek +%% Copyright 2004 Folkert van der Beek %% -%% This program is free software; you can redistribute it and/or -%% modify it under the terms of the GNU General Public License -%% as published by the Free Software Foundation; either version 2 -%% of the License, or (at your option) any later version. +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% of this license or (at your option) any later version. +%% The latest version of this license is in +%% http://www.latex-project.org/lppl.txt +%% and version 1.3 or later is part of all distributions of LaTeX +%% version 2005/12/01 or later. %% -%% This program is distributed in the hope that it will be useful, -%% but WITHOUT ANY WARRANTY; without even the implied warranty of -%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -%% GNU General Public License for more details. +%% This work has the LPPL maintenance status `maintained'. %% -%% Complaints, suggestions and comments may be sent to +%% The Current Maintainer of this work is Folkert van der Beek. %% -%% Folkert van der Beek -%% Spieghelstraat 78 -%% 9721 JX Groningen -%% the Netherlands +%% Complaints, suggestions and comments may be sent to %% -%% folkertvanderbeek at gmail dot com +%% Folkert van der Beek <folkertvanderbeek at gmail dot com> %% %%------------------------------------------------------------------- %% @@ -425,13 +422,22 @@ FUNCTION {parenthesize.check} STRINGS {z} FUNCTION {remove.dots} -{ 'z := - "" - { z empty$ not } - { z #1 #1 substring$ - z #2 global.max$ substring$ 'z := - duplicate$ "." = 'pop$ - { * } +{ 'z := % expects string on top of the stack, pops the string and assigns it to variable z + "" % push empty string + { z empty$ not } % returns 0 if variable z is empty + { z #1 #1 substring$ % push the first character of variable z + z #2 global.max$ substring$ 'z := % assigns the 2nd to last character of variable z to variable z + duplicate$ "\" = % pushes 1 if the last character is "\", otherwise 0 + { * % concatenates the last 2 literals + z #1 #1 substring$ % push the first character of variable z + z #2 global.max$ substring$ 'z := % assigns the 2nd to last character of variable z to variable z + * % concatenates the last 2 literals, i.e. every character, even a dot, following a "\" will be printed + } + { duplicate$ "." = % pushes 1 if the last character is ".", otherwise 0 + 'pop$ % pushes the pop$ function + { * } % concatenates the last 2 literals + if$ % pops the last character if it is a dot, otherwise concatenates it with the string on top of the stack + } if$ } while$ |