Japanese Moodle

　メッセージ機能でメール送信に失敗した時にエラーメッセージが表示されない問題はTrackerに報告しました．MDL-17838

こんな感じでどうでしょう？

lib/phpmailer/class.smtp.php

    function Connect($host,$port=0,$tval=30) {
        # set the error val to null so there is no confusion
        $this->error = null;

        # make sure we are __not__ connected
        if($this->connected()) {
            # ok we are connected! what should we do?
            # for now we will just give an error saying we
            # are already connected
            $this->error =
                array("error" => "Already connected to a server");
            return false;
        }

        if(empty($port)) {
            $port = $this->SMTP_PORT;
        }

// (Shirai111): SMTPサーバとの接続のチェックの強化とリトライ (2008/12/25)
// (Shirai111): ここから追加
        $retry = 0;
        while (1) {
            if ($retry >= 2) {  // リトライ回数（ここのみ変えれば良し）
               $this->error = array("error" => "Failed to connect to server",
                                    "errno" => $errno,
                                    "errstr" => $errstr);
               if($this->do_debug >= 1) {
                   echo "SMTP -> ERROR: " . $this->error["error"] .
                            ": $errstr ($errno)" . $this->CRLF;
               }
                return false;
            }
            if ($retry >= 1) sleep(10);
// (Shirai111): ここまで追加
        #connect to the smtp server
        $this->smtp_conn = fsockopen($host,    # the host of the server
                                     $port,    # the port to use
                                     $errno,   # error number if any
                                     $errstr,  # error message if any
                                     $tval);   # give up after ? secs
        # verify we connected properly
        if(empty($this->smtp_conn)) {
// (Shirai111): ここから追加
            $retry++;
            continue;
// (Shirai111): ここからコメントアウト
//          $this->error = array("error" => "Failed to connect to server",
//                               "errno" => $errno,
//                               "errstr" => $errstr);
//          if($this->do_debug >= 1) {
//              echo "SMTP -> ERROR: " . $this->error["error"] .
//                       ": $errstr ($errno)" . $this->CRLF;
//          }
//          return false;
// (Shirai111): ここまでコメントアウト
        }

        # sometimes the SMTP server takes a little longer to respond
        # so we will give it a longer timeout for the first read
        // Windows still does not have support for this timeout function
        if(substr(PHP_OS, 0, 3) != "WIN")
           socket_set_timeout($this->smtp_conn, $tval, 0);

        # get any announcement stuff
        $announce = $this->get_lines();

        # set the timeout  of any socket functions at 1/10 of a second
        //if(function_exists("socket_set_timeout"))
        //   socket_set_timeout($this->smtp_conn, 0, 100000);

        if($this->do_debug >= 2) {
            echo "SMTP -> FROM SERVER:" . $this->CRLF . $announce;
        }
// (Shirai111): SMTPサーバとの接続のチェックの強化とリトライ (2008/12/25)
// (Shirai111): ここから追加
        $code = substr($announce,0,3);
        if (enable_smtp_connect_checkandretry()) {
            if (empty($code) || ($code != '220')) {
                $this->Close();
                $retry++;
                continue;
            } else {
                break;
            }
        }
        }
// (Shirai111): ここまで追加

        return true;
    }

全くの未チェックです．最悪，メールの送信ができなくなる恐れがありますので適用にはご注意下さい．
と言いますのは，いまここに転記する際に，コードの丁度，真ん中辺りに正規のエラーチェックルーチンがあることに気付きました．なぜかこれをすり抜けるのが悩みの種だったのでスッカリ見落としていました．コメントアウトした部分はwhile()直後のretry回数のチェックに引っ掛かった時の処理の赤に（半ば無責任に）移動しました．