[freeside-commits] freeside/bin pod2x,1.12,1.13

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/bin
In directory wavetail.420.am:/tmp/cvs-serv11859

Modified Files:
	pod2x 
Log Message:
fix API upload

Index: pod2x
===================================================================
RCS file: /home/cvs/cvsroot/freeside/bin/pod2x,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- pod2x	4 Oct 2007 02:52:05 -0000	1.12
+++ pod2x	19 Feb 2008 02:38:33 -0000	1.13
@@ -59,7 +59,7 @@
 }
 
 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,
@@ -72,7 +72,7 @@
 if ( @ARGV ) {
   @files = @ARGV;
 } else {
-  @files =
+  @files = (
     glob("$site_perl/*.pm"),
     glob("$site_perl/*/*.pm"),
     glob("$site_perl/*/*/*.pm"),
@@ -80,7 +80,8 @@
     glob("$site_perl/bin/*.pod"),
     glob("./fs_selfservice/FS-SelfService/*.pm"),
     glob("./fs_selfservice/FS-SelfService/*/*.pm"),
-  ;
+  );
+
 }
 
 foreach my $file (@files) {