sblim-commit

[Adrian S. <a3s...@us...>]

Update of /cvsroot/sblim/sfcb
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17104

Modified Files:
	classProvider.c 
Log Message:
Fixed 1181080.
Now generating msg when no repository directory is found. 


Index: classProvider.c
===================================================================
RCS file: /cvsroot/sblim/sfcb/classProvider.c,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- classProvider.c	11 Apr 2005 23:13:41 -0000	1.7
+++ classProvider.c	12 Apr 2005 08:14:14 -0000	1.8
@@ -331,7 +331,7 @@
    return 0;
 }
 
-static UtilHashTable *gatherNameSpaces(char *dn, UtilHashTable *ns)
+static UtilHashTable *gatherNameSpaces(char *dn, UtilHashTable *ns, int first)
 {
    DIR *dir;
    struct dirent *de;
@@ -346,7 +346,7 @@
    }          
        
    dir=opendir(dn);
-   while ((de=readdir(dir))!=NULL) {
+   if (dir) while ((de=readdir(dir))!=NULL) {
       if (de->d_type==DT_DIR) {
          if (strcmp(de->d_name,".")==0) continue;
          if (strcmp(de->d_name,"..")==0) continue;
@@ -358,10 +358,13 @@
          cr=newClassRegister(n);
          if (cr) {
             ns->ft->put(ns, n+nsBaseLen, cr);
-            gatherNameSpaces(n,ns);
+            gatherNameSpaces(n,ns,0);
          }   
       } 
    }
+   else if (first) {
+      fprintf(stderr,"--- Repository %s not found\n",dn);
+   }
    closedir(dir);  
    return ns;     
 } 
@@ -381,7 +384,7 @@
    strcpy(dn,dir);
    if (dir[strlen(dir)-1]!='/') strcat(dn,"/");
    strcat(dn,"repository");
-   return gatherNameSpaces(dn,NULL);   
+   return gatherNameSpaces(dn,NULL,1);   
 }