Commit 255f8a00 authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2003-07-06 18:37:58 by cvscast] Bug fix...

Original author: cvscast
Date: 2003-07-06 18:37:58+00:00
parent bea793be
......@@ -201,6 +201,7 @@ and run_disp_record other v fields = function
in
aux other fields
| Some (RecNolabel (some,none)) ->
let other = other || (fields != []) in
let r = if other then some else none in
match r with
| Some r -> make_result_basic v r
......
......@@ -54,7 +54,7 @@ type Content =
type InlineText =
Char
| <(`b|`i|`tt|`em) {||}>[InlineText*]
| <(`b|`i|`tt|`em) {| style=?String |}>[InlineText*]
| <code>String
| <local href=String>String
| Xa | Ximg | Xbr
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment