From: ivan <ivan>
Date: Tue, 19 Feb 2008 02:38:28 +0000 (+0000)
Subject: fix API upload
X-Git-Tag: freeside_1_7_3rc1~96
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=fffb675bcc841fced1262e84b4d114cf9276aff9;p=freeside.git

fix API upload
---

diff --git a/bin/pod2x b/bin/pod2x
index 518784530..b66ed3ea2 100755
--- a/bin/pod2x
+++ b/bin/pod2x
@@ -57,7 +57,7 @@ foreach my $file (
 }
 
 my $mvs = WWW::Mediawiki::Client->new(
-            'host'           => 'www.sisd.com',
+            'host'           => 'www.freeside.biz',
             'wiki_path'      => 'mediawiki/index.php',
             'username'       => $mw_username,
             'password'       => $mw_password,
@@ -70,7 +70,7 @@ my @files;
 if ( @ARGV ) {
   @files = @ARGV;
 } else {
-  @files =
+  @files = (
     glob("$site_perl/*.pm"),
     glob("$site_perl/*/*.pm"),
     glob("$site_perl/*/*/*.pm"),
@@ -78,7 +78,7 @@ if ( @ARGV ) {
     glob("$site_perl/bin/*.pod"),
     glob("./fs_selfservice/FS-SelfService/*.pm"),
     glob("./fs_selfservice/FS-SelfService/*/*.pm"),
-  ;
+  ) ;
 }
 
 foreach my $file (@files) {