1 files changed, 9 insertions(+), 1 deletions(-)
M cli-mail.pl
M cli-mail.pl => cli-mail.pl +9 -1
@@ 246,7 246,15 @@ while($input = <>)
#
elsif ($action eq "set-folder")
{
- $folder = $args[1] ;
+ if ( $#args >= 1 )
+ {
+ $folder = $args[1] ;
+ }
+ else
+ {
+ $folder = "INBOX" ;
+ }
+ ###$folder = $args[1] ;
print "folder: $folder\n" ;
@threads = ( ) ;