move defualt_markup_rules to each subrules.

[otptools/otptools.git] / SourceForgeJP / Wiki.pm

diff --git a/SourceForgeJP/Wiki.pm b/SourceForgeJP/Wiki.pm
index be6b6df..906c657 100755 (executable)
--- a/SourceForgeJP/Wiki.pm
+++ b/SourceForgeJP/Wiki.pm
@@ -158,7 +158,6 @@ sub delete_page {
     } else {
        return 1;
     }
-        
 }
 
 
@@ -172,7 +171,6 @@ sub post_attachment {
     my $file_name = $args{file};
 
 
-
     my $url = $self->_get_wikipage_url( $project, $page_name );
     $url .= '/attach/!upload';
 
@@ -181,12 +179,13 @@ sub post_attachment {
     my $req = HTTP::Request::Common::POST $url, Content_Type => 'form-data',
     Content => [ new_attach => ["$file_name"],
                 replace_file => "1",
-                commit => "1",
+                commit => utf8::decode("アップロード"),
        ];
 
     my $resp = $ua->request( $req );
 
     if( $resp->is_error ) {
+         print "error:", $resp->message, "\n";
        return 0; #print "upload $file_name: failed.\n";
     } else {
        return 1; #print "upload $file_name: succeed.\n";