・常にレス送信が成功したと表示するようにした。

diff --git a/res/ExternalBoardPlugIn/MachiBBSPlugIn.dpr b/res/ExternalBoardPlugIn/MachiBBSPlugIn.dpr
index 446c6d5..33e2c4e 100644 (file)
--- a/res/ExternalBoardPlugIn/MachiBBSPlugIn.dpr
+++ b/res/ExternalBoardPlugIn/MachiBBSPlugIn.dpr
@@ -76,7 +76,7 @@ const
        MAJOR_VERSION                   = 1;
        MINOR_VERSION                   = 0;
        RELEASE_VERSION         = 'beta';
-       REVISION_VERSION        = 1;
+       REVISION_VERSION        = 2;
 
 // =========================================================================
 // \8eG\97p\8aÖ\90\94
@@ -473,7 +473,6 @@ var
        postResult              : PChar;
        uri                                             : TIdURI;
        uriList                         : TStringList;
-       responseCode    : Integer;
 begin
 
        uri                     := TIdURI.Create( URL );
@@ -494,13 +493,10 @@ begin
                        '&submit='      + HttpEncode( '\8f\91\82«\8d\9e\82Þ' );
 
                // \93Æ\8e©\82É\92Ê\90M\82µ\82È\82¢\8fê\8d\87\82Í InternalPost \82É\94C\82¹\82é\82±\82Æ\82ª\8fo\97\88\82é
-               responseCode := InternalPost( PChar( postURL ), PChar( postData ), postResult );
+               InternalPost( PChar( postURL ), PChar( postData ), postResult );
                DisposeResultString( postResult );
 
-               if responseCode = 200 then
-                       Result := dsComplete
-               else
-                       Result := dsError;
+               Result := dsComplete
        finally
                uri.Free;
                uriList.Free;