Modified lineskip and lineskiplimit in quotes

[latex-mlastyle.git] / mlastyle.bst

diff --git a/mlastyle.bst b/mlastyle.bst
index 8803e799217bac81c4ad56ac37e8e75a72ebc6e1..30b216959715dee3b2a194cef99a2ffe5d9a2375 100644 (file)
--- a/mlastyle.bst
+++ b/mlastyle.bst
@@ -1,4 +1,4 @@
-% $Id: mlastyle.bst,v 1.14 2003-11-23 00:15:32 tpope Exp $
+% $Id: mlastyle.bst,v 1.18 2003-11-27 05:11:13 tpope Exp $
 % BibTeX bibliography style `mlastyle'
 % Based on BibTeX standard bibliography style `plain'
        % version 0.99a for BibTeX versions 0.99a or later, LaTeX version 2.09.
@@ -38,6 +38,7 @@ ENTRY
     urldate
     accessdate
     urlpath
+    database
     version
     % eid isbn issn doi
   }
@@ -64,7 +65,7 @@ FUNCTION {init.consts}
   #0 'citealp.used :=
   #0 'url.used :=
   " \ \ \ \ \unskip\unskip\unskip\unskip\unskip " 'empty.title :=
-  %"" 'empty.title :=
+  "" 'empty.title :=
 }
 
 % I do this a lot
@@ -788,10 +789,14 @@ FUNCTION {format.tr.number}
 }
 
 FUNCTION {format.urldate}
-{ urldate missing$
+{ database empty$
+    'skip$
+    { database selective.emphasize output.nonnull new.block }
+  if$
+  urldate missing$
   { accessdate empty$
       { cite$ " has no urldate field" * warning$
-       "\theurldate"
+       "\theurldate{}"
       }
       { "accessdate in " cite$ * " is depreciated; use urldate instead" *
        warning$ accessdate
@@ -1182,6 +1187,7 @@ FUNCTION {mastersthesis}
   format.title "title" output.check
   new.block
   "Diss." format.thesis.type output.nonnull
+  new.block
   school "school" output.check
   address output
   format.date "year" output.check
@@ -1216,6 +1222,7 @@ FUNCTION {phdthesis}
   format.btitle "title" output.check
   new.block
   "Diss." format.thesis.type output.nonnull
+  new.block
   school "school" output.check
   address output
   format.date "year" output.check
@@ -1627,11 +1634,9 @@ FUNCTION {begin.bib}
     'skip$
   if$
   url.used
-    { "\expandafter\ifx\csname url\endcsname\relax\let\url\relax\fi"
-      write$ newline$
-      "\expandafter\ifx\csname theurldate\endcsname\relax"
+    { "\providecommand\url[1]{\texttt{#1}}"
       write$ newline$
-      "\let\theurldate\today\fi"
+      "\providecommand\theurldate{\today}"
       write$ newline$
     }
     'skip$