-linebreak

git-svn-id: https://www.lri.fr/svn/demons/bibtex2html/trunk@362 6aee9057-109c-4a6d-8c93-4c3f535006fd

Author: backtracking

CHANGES

@@ -1,5 +1,6 @@
 
  o macro \H (Hungarian umlauts)
+ o new option -linebreak to insert a linebreak between an entry and its links
 
 Version 1.82, 07/06/2006
 ========================

main.ml

@@ -14,7 +14,7 @@
  * (enclosed in the file GPL).
  *)
 
-(*i $Id: main.ml,v 1.59 2006-05-12 16:05:02 filliatr Exp $ i*)
+(*i $Id: main.ml,v 1.60 2006-08-25 12:02:06 filliatr Exp $ i*)
 
 (*s Main module of bibtex2html. *)
 
@@ -332,6 +332,7 @@ Usage: bibtex2html <options> [filename]
              do not print the abstracts (if any)
   -nokeywords
              do not print the keywords (if any)
+  -linebreak add a linebreak between an entry and its links
   -noheader  do not print the header (bibtex2html command)
   -nofooter  do not print the footer (bibtex2html web link)
   -noexpand  do not expand abbreviations in the BibTeX output
@@ -404,6 +405,8 @@ let parse () =
 i*)
     | ("-heveaurl" | "-hevea-url" | "--hevea-url") :: rem -> 
 	Latexscan.hevea_url := true; parse_rec rem
+    | ("-linebreak" | "--linebreak") :: rem ->
+	linebreak := true; parse_rec rem
     | ("-noheader" | "-no-header" | "--no-header") :: rem ->
 	print_header := false; parse_rec rem
     | ("-nofooter" | "-no-footer" | "--no-footer") :: rem ->

translate.ml

@@ -14,7 +14,7 @@
  * (enclosed in the file GPL).
  *)
 
-(*i $Id: translate.ml,v 1.72 2006-05-15 09:45:53 filliatr Exp $ i*)
+(*i $Id: translate.ml,v 1.73 2006-08-25 12:02:06 filliatr Exp $ i*)
 
 (*s Production of the HTML documents from the BibTeX bibliographies. *)
 
@@ -45,6 +45,7 @@ let bibentries_file = ref ""
 let title_url = ref false
 let use_label_name = ref false
 let use_keys = ref false
+let linebreak = ref false
 let note_fields = ref ([] : string list)
 let abstract_name = ref "Abstract"
 
@@ -397,7 +398,7 @@ let one_entry_summary ch biblio (_,b,((_,k,f) as e)) =
   output_string ch "\n"; 
   new_column ch;
   latex2html ch b;
-  (*Html.open_balise ch "br /";*)
+  if !linebreak then Html.open_balise ch "br /";
   output_string ch "\n";
 
   if !multiple then

translate.mli

@@ -14,7 +14,7 @@
  * (enclosed in the file GPL).
  *)
 
-(*i $Id: translate.mli,v 1.9 2006-05-12 16:05:02 filliatr Exp $ i*)
+(*i $Id: translate.mli,v 1.10 2006-08-25 12:02:06 filliatr Exp $ i*)
 
 (*s Production of the HTML documents from the BibTeX bibliographies. *)
 
@@ -43,6 +43,7 @@ val bib_entries : bool ref
 val input_file : string ref
 val output_file : string ref
 val use_label_name : bool ref
+val linebreak : bool ref
 
 type table_kind = Table | DL | NoTable
 val table : table_kind ref