From 48ef40bb2ada829d0437d993a788c16daacf618a Mon Sep 17 00:00:00 2001
From: KennethLavrsen <KennethLavrsen@0b4bb1d4-4e5a-0410-9cc4-b2b747904278>
Date: Mon, 10 Nov 2008 22:47:48 +0000
Subject: [PATCH] Item109: Finally reached the end of the renaming of
 TWikiPreferences to Default/SitePreferences in trunk

git-svn-id: http://svn.foswiki.org/trunk/TWikiDeploymentSpiderAddOn@527 0b4bb1d4-4e5a-0410-9cc4-b2b747904278
---
 twiki-deployment-spider.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/twiki-deployment-spider.pl b/twiki-deployment-spider.pl
index 2035d43..ca6750c 100755
--- a/twiki-deployment-spider.pl
+++ b/twiki-deployment-spider.pl
@@ -16,7 +16,7 @@
 
 # Description:
 #    1 Locates TWiki installs (uses Google SOAP API)
-#    2 Finds common information from TWikiPreferences
+#    2 Finds common information from DefaultPreferences
 #    2 Catalog users
 #    2 Discovers webs
 #    3 Writes found information information into a TWiki topic
@@ -121,7 +121,7 @@ package TWikiSite;
 | Number of users | $self->user_count() |
 | Users | http://sitename/..../Main/TWikiUsers
 | Webs names |
-| TWiki prefs | http://sitename/..../TWiki/TWikiPreferences
+| TWiki prefs | http://sitename/..../TWiki/DefaultPreferences
 | Plugins installed |
 | Main skin |
 
@@ -222,7 +222,7 @@ sub reg_site {
 #  print "$siteurl: \n";
 #  print "\t$baseurl \n";
   my $site = new TWikiSite ($siteurl);
-  my @webs = get_wikiweblist($baseurl."/TWiki/TWikiPreferences", $siteurl);
+  my @webs = get_wikiweblist($baseurl."/TWiki/DefaultPreferences", $siteurl);
   $site->webs(@webs);
 
   $site->home(get_home($baseurl));