[E-p-i-c-commits] org.epic.perleditor/src/org/epic/core/builders PerlBuilder.java,1.4,1.5

[Jochen L. <lue...@us...>]

Update of /cvsroot/e-p-i-c/org.epic.perleditor/src/org/epic/core/builders
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21488/src/org/epic/core/builders

Modified Files:
	PerlBuilder.java 
Log Message:
Changes for Eclipse 3.0

Index: PerlBuilder.java
===================================================================
RCS file: /cvsroot/e-p-i-c/org.epic.perleditor/src/org/epic/core/builders/PerlBuilder.java,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- PerlBuilder.java	8 May 2004 16:38:58 -0000	1.4
+++ PerlBuilder.java	3 Jun 2004 19:37:34 -0000	1.5
@@ -57,6 +57,16 @@
 			//fullBuild(monitor);
 		} else
 		{
+			// Add folders to successResources
+			if(getProject().hasNature(Constants.PERL_NATURE_ID)) {
+				FolderVisitor folderVisitor = new FolderVisitor();
+				try {
+					getProject().accept(folderVisitor);
+				} catch (CoreException e1) {
+					e1.printStackTrace();
+				}
+			}
+			
 			IResourceDelta delta = getDelta(getProject());
 			if (delta == null)
 			{
@@ -156,4 +166,18 @@
 
 		return true;
 	}
+}
+
+class FolderVisitor implements IResourceVisitor {
+	/*
+	 * (non-Javadoc)
+	 * 
+	 * @see org.eclipse.core.resources.IResourceVisitor#visit(org.eclipse.core.resources.IResource)
+	 */
+	public boolean visit(IResource resource) throws CoreException {
+		if(resource.getType() == IResource.FOLDER) {
+			PerlDecoratorManager.addSuccessResources(resource);
+		}
+		return true;
+	}
 }
\ No newline at end of file