[latex3-commits] [git/LaTeX3-latex3-l3build] master: New switch -m|--message for upload announcement (07014e8)

[Joseph Wright]

Repository : https://github.com/latex3/l3build
On branch  : master
Link       : https://github.com/latex3/l3build/commit/07014e89f0ab60497e31ebe8ecf89779473047ad

>---------------------------------------------------------------

commit 07014e89f0ab60497e31ebe8ecf89779473047ad
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Thu Dec 20 12:29:55 2018 +0000

    New switch -m|--message for upload announcement


>---------------------------------------------------------------

07014e89f0ab60497e31ebe8ecf89779473047ad
 CHANGELOG.md          |    4 ++++
 l3build-arguments.lua |    6 ++++++
 l3build-upload.lua    |    3 +++
 l3build.dtx           |    1 +
 4 files changed, 14 insertions(+)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 2bab27a..c46ed41 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -7,6 +7,10 @@ this project uses date-based 'snapshot' version identifiers.
 
 ## [Unreleased]
 
+### Added
+
+- Switch `-m|--message` for providing upload announcement from command line
+
 ### Fixed
 
 - Packaging of some team-specific files
diff --git a/l3build-arguments.lua b/l3build-arguments.lua
index e693ab9..5b394f9 100644
--- a/l3build-arguments.lua
+++ b/l3build-arguments.lua
@@ -106,6 +106,12 @@ option_list =
         desc  = "Name of last test to run",
         type  = "string"
       },
+    message =
+      {
+        desc  = "Text for upload announcement message",
+        short = "m",
+        type  = "string"
+      },
     rerun =
       {
         desc  = "Skip setup: simply rerun tests",
diff --git a/l3build-upload.lua b/l3build-upload.lua
index 68692b0..7ff0597 100644
--- a/l3build-upload.lua
+++ b/l3build-upload.lua
@@ -65,6 +65,9 @@ function upload()
   -- try a sensible default for the package name:
   uploadconfig.pkg = uploadconfig.pkg or ctanpkg or nil
 
+  -- Get data from command line if appropriate
+  uploadconfig.announcement = options["message"] or uploadconfig.announcement
+
   -- start building the curl command:
   ctan_post = curlexe .. " "
 
diff --git a/l3build.dtx b/l3build.dtx
index b62f2e4..84afa64 100644
--- a/l3build.dtx
+++ b/l3build.dtx
@@ -347,6 +347,7 @@
 %   should stop as soon as possible, rather than running all requested
 %   tests; the difference file is printed in the terminal directly in the case of failure
 %  \item |--last| Name of the last test to run
+% \item |--message| (|-m|) Text for upload announcement
 % \item |--quiet| (|-q|) Suppresses output from unpacking
 % \item |--rerun| Run tests without unpacking/set up
 % \item |--shuffle| Shuffle the order in which tests run