X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fbin%2Frt-mailgate.in;h=5ac9469d831f292e87556739a8446c965cbdc1b5;hb=9c68254528b6f2c7d8c1921b452fa56064783782;hp=6264d4389946947599d1eea40cf52255b872e480;hpb=ef20b2b6b1feb47ad02b5ff7525f1a0fd11d0fa4;p=freeside.git diff --git a/rt/bin/rt-mailgate.in b/rt/bin/rt-mailgate.in index 6264d4389..5ac9469d8 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 # # # (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, $/); <> };