summaryrefslogtreecommitdiff
path: root/bin/pod2x
diff options
context:
space:
mode:
authorivan <ivan>2008-02-19 02:38:33 +0000
committerivan <ivan>2008-02-19 02:38:33 +0000
commit38852d0e11e617f5f531e5edf6b4eb922a06107f (patch)
tree45859524a69e201954257ab24e93a755f28c3e8f /bin/pod2x
parentfbde646ee06e4c0e31c4352ea4d3470db201829a (diff)
fix API upload
Diffstat (limited to 'bin/pod2x')
-rwxr-xr-xbin/pod2x7
1 files changed, 4 insertions, 3 deletions
diff --git a/bin/pod2x b/bin/pod2x
index 741b78460..6b7153f96 100755
--- a/bin/pod2x
+++ b/bin/pod2x
@@ -59,7 +59,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,
@@ -72,7 +72,7 @@ my @files;
if ( @ARGV ) {
@files = @ARGV;
} else {
- @files =
+ @files = (
glob("$site_perl/*.pm"),
glob("$site_perl/*/*.pm"),
glob("$site_perl/*/*/*.pm"),
@@ -80,7 +80,8 @@ if ( @ARGV ) {
glob("$site_perl/bin/*.pod"),
glob("./fs_selfservice/FS-SelfService/*.pm"),
glob("./fs_selfservice/FS-SelfService/*/*.pm"),
- ;
+ );
+
}
foreach my $file (@files) {