From 3d84458aa7f3443ff8b9175d8be4fc05137523ae Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sun, 1 Jul 2012 10:00:58 -0600
Subject: [PATCH] scribble Latex: add \SNumberOfAuthors{} in output

original commit: 814c974d015b647e8482a46720f0728d3b318175
---
 collects/scribble/latex-render.rkt | 2 ++
 collects/scribble/scribble.tex     | 3 +++
 2 files changed, 5 insertions(+)

diff --git a/collects/scribble/latex-render.rkt b/collects/scribble/latex-render.rkt
index 7bce9341..f2285a43 100644
--- a/collects/scribble/latex-render.rkt
+++ b/collects/scribble/latex-render.rkt
@@ -120,6 +120,8 @@
                       (if (null? auths) "Empty" ""))
               (render-content (part-title-content d) d ri)
               (printf "}{~a}{" vers)
+              (unless (null? auths)
+                (printf "\\SNumberOfAuthors{~a}" (length auths)))
               (for/fold ([first? #t]) ([auth (in-list auths)])
                 (unless first? (printf "\\SAuthorSep{}"))
                 (do-render-paragraph auth d ri #t #f)
diff --git a/collects/scribble/scribble.tex b/collects/scribble/scribble.tex
index 7d766f73..2e10c840 100644
--- a/collects/scribble/scribble.tex
+++ b/collects/scribble/scribble.tex
@@ -146,6 +146,9 @@
 \newcommand{\SAuthor}[1]{#1}
 \newcommand{\SAuthorSep}[1]{\qquad}
 
+% Useful for some styles, such as sigalternate:
+\newcommand{\SNumberOfAuthors}[1]{}
+
 % Used for parts with the 'hidden style variant:
 \newcommand{\sectionhidden}[1]{\section{#1}}
 \newcommand{\subsectionhidden}[1]{\subsection{#1}}