e$B$J$+$@$G$9!#e(B
lib/net/imap.rbe$B$rD>@<B9T$9$k$H;H$($k4J0We(BIMAPe$B%/%i%$%"%s%H$r!"e(B
starttlse$B$KBP1~$5$;$F$_$^$7$?!#e(B
Index: lib/net/imap.rb
— lib/net/imap.rb (revision 28780)
+++ lib/net/imap.rb (working copy)
@@ -3472,7 +3472,8 @@ if FILE == $0
$auth = “login”
$ssl = false
-
$starttls = false
def usage
- $stderr.print <<EOF
- <<EOF
usage: #{$0} [options]
@@ -3481,4 +3482,5 @@ usage: #{$0} [options]
–user=USER specifies user
–auth=AUTH specifies auth type
- –starttls use starttls
–ssl use ssl
EOF
@@ -3511,4 +3513,5 @@ EOF
[’–user’, GetoptLong::REQUIRED_ARGUMENT],
[’–auth’, GetoptLong::REQUIRED_ARGUMENT], -
begin['--starttls', GetoptLong::NO_ARGUMENT], ['--ssl', GetoptLong::NO_ARGUMENT])
@@ -3523,20 +3526,20 @@ EOF
when “–ssl”
$ssl = true -
when "--starttls"
-
$starttls = true when "--debug" Net::IMAP.debug = true when "--help" usage
-
exit(1)
-
endexit end
rescue
- usage
- exit(1)
- abort usage
end
$host = ARGV.shift
unless $host
- usage
- exit(1)
- abort usage
end
@@ -3543,4 +3546,5 @@
imap = Net::IMAP.new($host, :port => $port, :ssl => $ssl)
begin
- imap.starttls if $starttls
password = get_password
imap.authenticate($auth, $user, password)