From f0eae281c33d01f4fda0ea37fb9f06d61dd0b544 Mon Sep 17 00:00:00 2001
From: Gerhard Gonter <ggonter@gmail.com>
Date: Fri, 3 Nov 2017 18:39:06 +0100
Subject: [PATCH] REDMINE environment variable to select configuration stanza
---
lib/Redmine/CLI.pm | 8 ++++++++
red.pl | 2 +-
2 files changed, 9 insertions(+), 1 deletion(-)
diff --git a/lib/Redmine/CLI.pm b/lib/Redmine/CLI.pm
index d3b92f0..e5577b0 100644
--- a/lib/Redmine/CLI.pm
+++ b/lib/Redmine/CLI.pm
@@ -1,4 +1,8 @@
+=head3 Environment variables
+
+ REDMINE ... specify stanza of selected Redmine instance
+
=pod
=head1 NAME
@@ -60,6 +64,10 @@ EOPOD
'env' => <<EOPOD,
=head2 Enivironment
+=head3 Environment variables
+
+ REDMINE ... specify stanza of selected Redmine instance
+
=head3 default attributes
project_name
diff --git a/red.pl b/red.pl
index badc056..880c3f6 100755
--- a/red.pl
+++ b/red.pl
@@ -9,7 +9,7 @@ $Data::Dumper::Indent= 1;
use Redmine::CLI;
- my $rm_cli= new Redmine::CLI();
+ my $rm_cli= new Redmine::CLI(cfg_stanza => $ENV{'REDMINE'});
# print __LINE__, " rm_cli: ", Dumper ($rm_cli);
$rm_cli->parse_args(@ARGV);
--
GitLab