/utphys

To download this project, use:
bzr branch http://golem.ph.utexas.edu/~distler/code/utphys/

« back to all changes in this revision

Viewing changes to utphys.bst

  • Committer: Jacques Distler
  • Date: 2011-08-03 18:20:06 UTC
  • Revision ID: distler@golem.ph.utexas.edu-20110803182006-vhhzc21gga2th9oj
Tags: 2.7
utphys.bst 2.7: Fix "et~al." in format.crossref.editor, too.
(Reported by Blake Stacey)

Show diffs side-by-side

added added

removed removed

1
 
% UT Physics bibliographic style, ver. 2.5. Based on:
 
1
% UT Physics bibliographic style, ver. 2.7. Based on:
2
2
%
3
3
%X     IEEE Transactions bibliography style (29-Jan-88 version)
4
4
%X       numeric labels, order-of-reference, IEEE abbreviations,
53
53
%                                    MACROs (thanks to Mateus Araujo)
54
54
%                   ver 2.6   2/11 - Yipes! Fix capitalization of titles, spooged
55
55
%                                    in previous version. (Reported by Ling Weak)
56
 
%                   ver 2.7  12/18 - Fix format.title and format.title.p for when the
57
 
%                                    title contains trailing punctuation.
 
56
%                   ver 2.7   8/11 - Fix "et~al." in format.crossref.editor, too.
 
57
%                                    (Reported by Blake Stacey)
58
58
%
59
59
% HyperTeX Wizardry:
60
60
%
373
373
                'skip$
374
374
              if$
375
375
              t "others" =
376
 
                { " {\em et al.}" * }
 
376
                { " {\em et~al.}" * }
377
377
                { string.and * t * }
378
378
              if$
379
379
            }
473
473
FUNCTION {format.title}
474
474
{ title empty$
475
475
    { "" }
476
 
    {title title text.length$ #1 substring$ "?" =
477
 
     title title text.length$ #1 substring$ "!" =
478
 
     title title text.length$ #1 substring$ "." =
479
 
     or or
480
 
      { "``" title "t" change.case$ * "''" * }
481
 
      { "``" title "t" change.case$ * ",''" * }
482
 
    if$
483
 
   }
 
476
    { "``" title "t" change.case$ * ",''" * }
484
477
  if$
485
478
}
486
479
 
487
480
FUNCTION {format.title.p}
488
481
{ title empty$
489
482
    { "" }
490
 
    { "``" title "t" change.case$ * add.period$ "''" * }
 
483
    { "``" title "t" change.case$ * ".''" * }
491
484
  if$
492
485
}
493
486
 
769
762
{ editor #1 "{vv~}{ll}" format.name$
770
763
  editor num.names$ duplicate$
771
764
  #2 >
772
 
    { pop$ " {\em et.~al.}" * }
 
765
    { pop$ " {\em et~al.}" * }
773
766
    { #2 <
774
767
        'skip$
775
768
        { editor #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" =
776
 
            { " {\em et.~al.}" * }
 
769
            { " {\em et~al.}" * }
777
770
            { string.and * editor #2 "{vv~}{ll}" format.name$ * }
778
771
          if$
779
772
        }