From b76ed3d3ae49b1f858f9ca170858a6ce95689bcb Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 21 Aug 2013 19:39:12 -0600
Subject: [PATCH] scribble: add 'roman as a built-in element style

original commit: 2084f94c4728329ce6bbf0edc001c9237805e2da
---
 pkgs/scribble-pkgs/scribble-doc/scribblings/scribble/core.scrbl | 2 +-
 pkgs/scribble-pkgs/scribble-lib/scribble/html-render.rkt        | 1 +
 pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt       | 1 +
 pkgs/scribble-pkgs/scribble-lib/scribble/scribble.css           | 2 +-
 4 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/pkgs/scribble-pkgs/scribble-doc/scribblings/scribble/core.scrbl b/pkgs/scribble-pkgs/scribble-doc/scribblings/scribble/core.scrbl
index 491fbccb..45b95952 100644
--- a/pkgs/scribble-pkgs/scribble-doc/scribblings/scribble/core.scrbl
+++ b/pkgs/scribble-pkgs/scribble-doc/scribblings/scribble/core.scrbl
@@ -780,7 +780,7 @@ recognized:
 
 @itemize[
 
- @item{@racket['tt], @racket['italic], @racket['bold], @racket['sf],
+ @item{@racket['tt], @racket['italic], @racket['bold], @racket['roman], @racket['sf],
        @racket['url], @racket['subscript], @racket['superscript], 
        @racket['smaller], @racket['larger] ---
        Basic styles recognized by all renders.}
diff --git a/pkgs/scribble-pkgs/scribble-lib/scribble/html-render.rkt b/pkgs/scribble-pkgs/scribble-lib/scribble/html-render.rkt
index dca0c9f0..71362b5c 100644
--- a/pkgs/scribble-pkgs/scribble-lib/scribble/html-render.rkt
+++ b/pkgs/scribble-pkgs/scribble-lib/scribble/html-render.rkt
@@ -1340,6 +1340,7 @@
            [(italic) '([style "font-style: italic"])]
            [(bold) '([style "font-weight: bold"])]
            [(tt) '([class "stt"])]
+           [(roman) '([class "sroman"])]
            [(url) '([class "url"])]
            [(no-break) '([class "nobreak"])]
            [(sf) '([style "font-family: sans-serif; font-size: 80%; font-weight: bold"])]
diff --git a/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt b/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt
index efd793c1..f225023a 100644
--- a/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt
+++ b/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt
@@ -392,6 +392,7 @@
                   [(url) (wrap e "Snolinkurl" 'url)]
                   [(no-break) (wrap e "mbox" tt?)]
                   [(sf) (wrap e "textsf" #f)]
+                  [(roman) (wrap e "textrm" #f)]
                   [(subscript) (wrap e "textsub" #f)]
                   [(superscript) (wrap e "textsuper" #f)]
                   [(smaller) (wrap e "Smaller" #f)]
diff --git a/pkgs/scribble-pkgs/scribble-lib/scribble/scribble.css b/pkgs/scribble-pkgs/scribble-lib/scribble/scribble.css
index d521d28f..045d7e87 100644
--- a/pkgs/scribble-pkgs/scribble-lib/scribble/scribble.css
+++ b/pkgs/scribble-pkgs/scribble-lib/scribble/scribble.css
@@ -13,7 +13,7 @@
 }
 
 /* Serif: */
-.main, .refcontent, .tocview, .tocsub, i {
+.main, .refcontent, .tocview, .tocsub, .sroman, i {
   font-family: serif;
 }