From 06966ab71a5abe5489e515d8095ff9deb49a8769 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 11 Apr 2008 03:54:40 +0000
Subject: [PATCH] fix latex output with image in section

svn: r9252

original commit: b10dbe03ab778e74e54e67d7e5f5f0cf72c900a7
---
 collects/scribble/latex-render.ss | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/collects/scribble/latex-render.ss b/collects/scribble/latex-render.ss
index e0a22def..d5b06f73 100644
--- a/collects/scribble/latex-render.ss
+++ b/collects/scribble/latex-render.ss
@@ -54,7 +54,7 @@
               (printf "\\twocolumn\n\\parskip=0pt\n\\addcontentsline{toc}{section}{Index}\n"))
             (let ([no-number? (and (pair? number)
                                    (not (car number)))])
-              (printf "\\~a~a~a{"
+              (printf "\\~a~a~a~a{"
                       (case (length number)
                         [(0 1) "sectionNewpage\n\n\\section"]
                         [(2) "subsection"]
@@ -66,7 +66,10 @@
                           "")
                       (if no-number?
                           "*"
-                          "")))
+                          "")
+                      (if (part-style? d 'hidden)
+                          ""
+                          "[]")))
             (render-content (part-title-content d) d ri)
             (printf "}")
             (when (part-style? d 'index)