[frontierkernel-commits] odbs/mainResponderRoot/mainResponder/search/server restartIndex,1.1.1.1,1.2

[creedon <icr...@us...>]

Update of /cvsroot/frontierkernel/odbs/mainResponderRoot/mainResponder/search/server
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12756

Modified Files:
	restartIndex 
Log Message:
added indexName parameter

Index: restartIndex
===================================================================
RCS file: /cvsroot/frontierkernel/odbs/mainResponderRoot/mainResponder/search/server/restartIndex,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** restartIndex	26 Mar 2005 21:46:12 -0000	1.1.1.1
--- restartIndex	17 Jan 2006 23:27:06 -0000	1.2
***************
*** 1,3 ****
  FrontierVcsFile:1:scpt:mainResponder.search.server.restartIndex
  
! on restartIndex (siteName, flMessages=false) {
	ÇDelete all pages from the index that are in the specified site.
		ÇReturns the number of pages deleted.
	
	local (indexPath = mainResponder.search.utilities.getIndexPath ());
	
	mainResponder.search.utilities.assureIndex ();
	
	local (adrIndex = @[indexPath].index);
	local (adrPageInfoTable = @[indexPath].pageInfo);
	
	local (i, lowerSiteName = string.lower (siteName));
	local (ctDeletes = 0);
	
	ÇLoop through all indexed pages, looking for pages in this site.
	for i = sizeOf (adrPageInfoTable^) downTo 1 {
		local (adrPageInfo = @adrPageInfoTable^ [i]);
		local (url = nameOf (adrPageInfo^));
		
		if flMessages {
			msg ("Search Engine: checking " + url)};
		
		if defined (adrPageInfo^.siteName) {
			local (lowerPageSite = string.lower (adrPageInfo^.siteName));
			
			ÇIs this page in the site?
			if lowerPageSite == lowerSiteName {
				ÇDelete this page from the index.
				
				if flMessages {
					msg ("Search Engine: de-indexing " + url + "...")};
				
				mainResponder.search.server.deIndexPage (url);
				ctDeletes++}};
		
		sys.systemTask ()};
	
	if flMessages {
		msg ("Search Engine: Saving Index.root...")};
	
	fileMenu.save (indexPath);
	
	msg ("");
	
	return (ctDeletes)}
\ No newline at end of file
--- 1,3 ----
  FrontierVcsFile:1:scpt:mainResponder.search.server.restartIndex
  
! on restartIndex (siteName, flMessages=false, indexName = nil) {
	ÇChanges
		Ç2/19/00; 6:00:13 PM by TAC
			Çadded indexName parameter
		ÇDelete all pages from the index that are in the specified site.
			ÇReturns the number of pages deleted.
	
	local (indexPath = mainResponder.search.utilities.getIndexPath (indexName));
	
	mainResponder.search.utilities.assureIndex (indexName);
	
	local (adrIndex = @[indexPath].index);
	local (adrPageInfoTable = @[indexPath].pageInfo);
	
	local (i, lowerSiteName = string.lower (siteName));
	local (ctDeletes = 0);
	
	ÇLoop through all indexed pages, looking for pages in this site.
	for i = sizeOf (adrPageInfoTable^) downTo 1 {
		local (adrPageInfo = @adrPageInfoTable^ [i]);
		local (url = nameOf (adrPageInfo^));
		
		if flMessages {
			msg ("Search Engine: checking " + url)};
		
		if defined (adrPageInfo^.siteName) {
			local (lowerPageSite = string.lower (adrPageInfo^.siteName));
			
			ÇIs this page in the site?
			if lowerPageSite == lowerSiteName {
				ÇDelete this page from the index.
				
				if flMessages {
					msg ("Search Engine: de-indexing " + url + "...")};
				
				mainResponder.search.server.deIndexPage (url, indexName: indexName);
				ctDeletes++}};
		
		sys.systemTask ()};
	
	if flMessages {
		msg ("Search Engine: Saving " + indexName + "...")};
	
	fileMenu.save (indexPath);
	
	msg ("");
	
	return (ctDeletes)};

bundle { // testing
	ÇrestartIndex ("Sample mainResponder Website")
	restartIndex ("sample", true)}
\ No newline at end of file