From owner-svn-doc-head@FreeBSD.ORG  Tue Mar  4 19:52:53 2014
Return-Path: <owner-svn-doc-head@FreeBSD.ORG>
Delivered-To: svn-doc-head@freebsd.org
Received: from mx1.freebsd.org (mx1.freebsd.org [8.8.178.115])
 (using TLSv1 with cipher ADH-AES256-SHA (256/256 bits))
 (No client certificate requested)
 by hub.freebsd.org (Postfix) with ESMTPS id 7D2F17E4;
 Tue,  4 Mar 2014 19:52:53 +0000 (UTC)
Received: from svn.freebsd.org (svn.freebsd.org
 [IPv6:2001:1900:2254:2068::e6a:0])
 (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits))
 (No client certificate requested)
 by mx1.freebsd.org (Postfix) with ESMTPS id 50161FEC;
 Tue,  4 Mar 2014 19:52:53 +0000 (UTC)
Received: from svn.freebsd.org ([127.0.1.70])
 by svn.freebsd.org (8.14.8/8.14.8) with ESMTP id s24JqruS081729;
 Tue, 4 Mar 2014 19:52:53 GMT (envelope-from pgj@svn.freebsd.org)
Received: (from pgj@localhost)
 by svn.freebsd.org (8.14.8/8.14.8/Submit) id s24JqrhM081728;
 Tue, 4 Mar 2014 19:52:53 GMT (envelope-from pgj@svn.freebsd.org)
Message-Id: <201403041952.s24JqrhM081728@svn.freebsd.org>
From: Gabor Pali <pgj@FreeBSD.org>
Date: Tue, 4 Mar 2014 19:52:53 +0000 (UTC)
To: doc-committers@freebsd.org, svn-doc-all@freebsd.org,
 svn-doc-head@freebsd.org
Subject: svn commit: r44119 - head/en_US.ISO8859-1/htdocs/cgi
X-SVN-Group: doc-head
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
X-BeenThere: svn-doc-head@freebsd.org
X-Mailman-Version: 2.1.17
Precedence: list
List-Id: SVN commit messages for the doc tree for head
 <svn-doc-head.freebsd.org>
List-Unsubscribe: <http://lists.freebsd.org/mailman/options/svn-doc-head>,
 <mailto:svn-doc-head-request@freebsd.org?subject=unsubscribe>
List-Archive: <http://lists.freebsd.org/pipermail/svn-doc-head/>
List-Post: <mailto:svn-doc-head@freebsd.org>
List-Help: <mailto:svn-doc-head-request@freebsd.org?subject=help>
List-Subscribe: <http://lists.freebsd.org/mailman/listinfo/svn-doc-head>,
 <mailto:svn-doc-head-request@freebsd.org?subject=subscribe>
X-List-Received-Date: Tue, 04 Mar 2014 19:52:53 -0000

Author: pgj
Date: Tue Mar  4 19:52:52 2014
New Revision: 44119
URL: http://svnweb.freebsd.org/changeset/doc/44119

Log:
  - Attempt to implement support for the sponsor tag in the quarterly status
    report generator
  
  Assisted by:	gjb

Modified:
  head/en_US.ISO8859-1/htdocs/cgi/monthly.cgi

Modified: head/en_US.ISO8859-1/htdocs/cgi/monthly.cgi
==============================================================================
--- head/en_US.ISO8859-1/htdocs/cgi/monthly.cgi	Tue Mar  4 19:25:22 2014	(r44118)
+++ head/en_US.ISO8859-1/htdocs/cgi/monthly.cgi	Tue Mar  4 19:52:52 2014	(r44119)
@@ -11,6 +11,7 @@ my $debug  = param("debug") || "";
 
 my $NumDevelopers = 3;
 my $NumLinks      = 4;
+my $NumSponsors   = 2;
 my $NumTasks      = 5;
 
 my @messages;
@@ -118,6 +119,16 @@ if ($Submit)
 		}
 	}
 
+	my @sponsors;
+	foreach my $Num (1..$NumSponsors)
+	{
+		my $sponsor = param("Sponsor$Num")  || "";
+		push(@hidden, hidden("Sponsor$Num"));
+
+		next unless $sponsor;
+		push(@sponsors, xml(2, "sponsor", "", xmltext(3, $sponsor)));
+	}
+
 	my @tasks;
 	foreach my $Num (1..$NumTasks)
 	{
@@ -149,6 +160,8 @@ if ($Submit)
             xml(1, "body",
                 xml(2, "p", "", xmltext(3, @info))),
             "\n",
+            @sponsors,
+            "\n",
             xml(1, "help", "", @tasks),
         );
 	my $contents = join('', @contents);
@@ -180,6 +193,13 @@ foreach my $Num (1..$NumLinks)
 			td(textfield(-name => "Desc$Num",     -size => 20))));
 }
 
+my @SponsorTable;
+foreach my $Num (1..$NumSponsors)
+{
+	push(@SponsorTable,
+		 TR(td(textarea(-name => "Sponsor$Num", -rows => 1, -cols => 60))));
+}
+
 my @TaskTable;
 foreach my $Num (1..$NumTasks)
 {
@@ -227,6 +247,13 @@ print
 					   -rows => 7,
 					   -cols => 60)),
 
+   h3("Sponsors (optional):"),
+   blockquote(table({"BORDER" => 0,
+					 "COLS"   => 1,
+					 "NOSAVE" => 1},
+					TR(td("Name")),
+					@SponsorTable)),
+
    h3("Open tasks (optional):"),
    blockquote(table({"BORDER" => 0,
 					 "COLS"   => 5,