summaryrefslogtreecommitdiff
path: root/rt/bin/rt-mailgate.in
diff options
context:
space:
mode:
authorivan <ivan>2008-03-02 04:06:06 +0000
committerivan <ivan>2008-03-02 04:06:06 +0000
commit9c68254528b6f2c7d8c1921b452fa56064783782 (patch)
tree09623ba39355e74f1cff2f3c35b7347bd309f306 /rt/bin/rt-mailgate.in
parentef20b2b6b1feb47ad02b5ff7525f1a0fd11d0fa4 (diff)
import rt 3.4.6
Diffstat (limited to 'rt/bin/rt-mailgate.in')
-rw-r--r--rt/bin/rt-mailgate.in15
1 files changed, 6 insertions, 9 deletions
diff --git a/rt/bin/rt-mailgate.in b/rt/bin/rt-mailgate.in
index 6264d43..5ac9469 100644
--- a/rt/bin/rt-mailgate.in
+++ b/rt/bin/rt-mailgate.in
@@ -3,7 +3,7 @@
#
# COPYRIGHT:
#
-# This software is Copyright (c) 1996-2007 Best Practical Solutions, LLC
+# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC
# <jesse@bestpractical.com>
#
# (Except where explicitly superseded by other copyright notices)
@@ -23,9 +23,7 @@
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
-# 02110-1301 or visit their web page on the internet at
-# http://www.gnu.org/copyleft/gpl.html.
+# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
#
#
# CONTRIBUTION SUBMISSION POLICY:
@@ -46,6 +44,7 @@
# those contributions and any derivatives thereof.
#
# END BPS TAGGED BLOCK }}}
+
=head1 NAME
rt-mailgate - Mail interface to RT3.
@@ -54,7 +53,6 @@ rt-mailgate - Mail interface to RT3.
use strict;
-use warnings;
use Getopt::Long;
use LWP::UserAgent;
@@ -78,11 +76,10 @@ my $ua = LWP::UserAgent->new();
$ua->cookie_jar( { file => $opts{jar} } );
my %args = (
- SessionType => 'REST', # Surpress login box
+ queue => $opts{queue},
+ action => $opts{action},
+ SessionType => 'REST', # Surpress login box
);
-foreach ( qw(queue action) ) {
- $args{$_} = $opts{$_} if defined $opts{$_};
-};
# Read the message in from STDIN
$args{'message'} = do { local (@ARGV, $/); <> };