X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fbin%2Frt-mailgate.in;h=d6e80b8f2f3f73b7fbdef0fb9231f778279fc206;hb=refs%2Fheads%2FFREESIDE_2_3_BRANCH;hp=271806c00873252677d53970078d1f2784604465;hpb=fc6209f398899f0211cfcedeb81a3cd65e04a941;p=freeside.git diff --git a/rt/bin/rt-mailgate.in b/rt/bin/rt-mailgate.in index 271806c00..d6e80b8f2 100644 --- a/rt/bin/rt-mailgate.in +++ b/rt/bin/rt-mailgate.in @@ -1,9 +1,9 @@ -#!@PERL@ -w +#!@PERL@ # BEGIN BPS TAGGED BLOCK {{{ # # COPYRIGHT: # -# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC +# This software is Copyright (c) 1996-2013 Best Practical Solutions, LLC # # # (Except where explicitly superseded by other copyright notices) @@ -81,9 +81,7 @@ unless ( $opts{'url'} ) { my $ua = new LWP::UserAgent; $ua->cookie_jar( { file => $opts{'jar'} } ) if $opts{'jar'}; -my %args = ( - SessionType => 'REST', # Surpress login box -); +my %args; foreach ( qw(queue action) ) { $args{$_} = $opts{$_} if defined $opts{$_}; }; @@ -186,7 +184,7 @@ sub write_down_message { print STDERR "$0: Couldn't create temp file, using memory\n"; print STDERR "error: $@\n" if $@; - my $message = \do { local (@ARGV, $/); <> }; + my $message = \do { local (@ARGV, $/); }; unless ( $$message =~ /\S/ ) { print STDERR "$0: no message passed on STDIN\n"; exit 0;