imapt : add -l/--list parameter

imapt

@@ -91,6 +91,13 @@ parser.add_option('-v',
                   action="store_true",
                   dest="verbose")
 
+parser.add_option('-l',
+                  '--list',
+                  action="store_true",
+                  dest="list",
+                  help="List mailboxes",
+                  default=False)
+
 (options, args) = parser.parse_args()
 
 if options.verbose:
@@ -141,14 +148,20 @@ if options.user:
 		sys.exit(3)
 		
 try:
+	if options.list:
+		logging.info('List mailbox')
+		(status,l) = server.list()
+		for d in l:
+			logging.info('   "%s"' % d)
+	else:
 		logging.debug("Select mailbox")
 		ret = server.select(options.mailbox)
 		if len(ret)>0 and ret[0]=='OK':
 			logging.info("Mailbox %s content %s message(s)" % (options.mailbox,ret[1][0]))
 		else:
 			logging.error("Selecting return incorrected : %s" % ret)
+		server.close()
 except Exception as e:
 	logging.critical('Error selecting mailbox %s : %s' % (option.mailbox,e))
 finally:
-	server.close()
 	server.logout()