--- gotmail-0.8.2.orig/gotmail +++ gotmail-0.8.2/gotmail @@ -197,7 +197,7 @@ # and also to Tim Dijkstra. -pik- sub parseConfig { - if ("@ARGV" =~ /(\s|^)(-c|--config-file)\ ([\w\.~\/\-]*)(\s|$)/i) { + if ("@ARGV" =~ /(\s|^)(-c|--config-file)\ ([\w\.~\/address@hidden)(\s|$)/i) { $conf_file = $3; if (! -r $conf_file) { die "Config file <$conf_file> is not readable!\n"; @@ -1008,7 +1008,7 @@ open PR,"|" . $conf_procmail_bin; print PR $output; close PR; - print "Done.\n"; + dispText("Done.\n"); } elsif ($resend_address eq "") { my($output) = $Message; @@ -1123,13 +1123,13 @@ if ($conf_movespam) { # Figure out the ID of the Spam folder $spam_folder_id = getFolderId($host, $folder_index_url, $conf_movespam); - print "\$spam_folder_id->".$spam_folder_id."\n"; + dispText("\$spam_folder_id->".$spam_folder_id."\n"); } if ($conf_move_messages_after_download) { # Figure out the ID of the move to folder $move_folder_id = getFolderId($host, $folder_index_url, $conf_move_messages_after_download); - print "\$move_folder_id->".$move_folder_id."\n"; + dispText("\$move_folder_id->".$move_folder_id."\n"); } # Ok let's get the folder list!