diff options
author | Karl Berry <karl@freefriends.org> | 2006-09-17 21:54:50 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-09-17 21:54:50 +0000 |
commit | 5275f90ac6aaec1b0ac873e981b9baaccdec330f (patch) | |
tree | 7174b4e5a6b53e243ad07ccff388389399314508 /Master/texmf-dist/bibtex/bst/stellenbosch/usmeg-a.bst | |
parent | 6a35763c7e3f70d61db5b7c296402ee180f37900 (diff) |
stellenbosch 5.0 (14sep06)
git-svn-id: svn://tug.org/texlive/trunk@2139 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/bibtex/bst/stellenbosch/usmeg-a.bst')
-rw-r--r-- | Master/texmf-dist/bibtex/bst/stellenbosch/usmeg-a.bst | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/Master/texmf-dist/bibtex/bst/stellenbosch/usmeg-a.bst b/Master/texmf-dist/bibtex/bst/stellenbosch/usmeg-a.bst index 85c75f37773..98be85449fc 100644 --- a/Master/texmf-dist/bibtex/bst/stellenbosch/usmeg-a.bst +++ b/Master/texmf-dist/bibtex/bst/stellenbosch/usmeg-a.bst @@ -185,12 +185,11 @@ FUNCTION {remove.dots} while$ } -FUNCTION {remove.spaces} - { 'z := - "" - { z empty$ not } - { z #1 #1 substring$ - z #2 global.max$ substring$ 'z := +STRINGS {zstr} +FUNCTION {remove.spaces} { 'zstr := "" + { zstr empty$ not } + { zstr #1 #1 substring$ + zstr #2 global.max$ substring$ 'zstr := duplicate$ "~" = 'pop$ { duplicate$ " " = |