From f1aad8f0759688ade29a34cc45b81c843dc29413 Mon Sep 17 00:00:00 2001
From: handa <handa>
Date: Mon, 30 Oct 2006 00:46:15 +0000
Subject: [PATCH] *** empty log message ***

---
 src/database.c |   31 +++++++++++++++++++------------
 1 file changed, 19 insertions(+), 12 deletions(-)

diff --git a/src/database.c b/src/database.c
index 7f3fbdf..80907f4 100644
--- a/src/database.c
+++ b/src/database.c
@@ -434,7 +434,7 @@ gen_database_name (char *buf, MSymbol *tags)
   strcpy (buf, msymbol_name (tags[0]));
   for (i = 1; i < 4; i++)
     {
-      strcat (buf, ", ");
+      strcat (buf, ",");
       strcat (buf, msymbol_name (tags[i]));
     }
   return buf;
@@ -492,9 +492,20 @@ load_database (MSymbol *tags, void *extra_info)
   void *value;
   char *filename = get_database_file (db_info, NULL);
   FILE *fp;
+  int mdebug_mask = MDEBUG_DATABASE;
+  char buf[256];
 
+  MDEBUG_PRINT1 (" [DB] <%s>", gen_database_name (buf, tags));
   if (! filename || ! (fp = fopen (filename, "r")))
-    MERROR (MERROR_DB, NULL);
+    {
+      if (filename)
+	MDEBUG_PRINT1 (" open fail: %s\n", filename);
+      else
+	MDEBUG_PRINT1 (" not found: %s\n", db_info->filename);
+      MERROR (MERROR_DB, NULL);
+    }
+
+  MDEBUG_PRINT1 (" from %s\n", filename);
 
   if (tags[0] == Mchar_table)
     value = load_chartable (fp, tags[1]);
@@ -652,7 +663,7 @@ register_database (MSymbol tags[4], void *(*loader) (MSymbol *, void *),
 }
 
 static void
-register_databases_in_files (MSymbol tags[4], glob_t *globbuf)
+register_databases_in_files (MSymbol tags[4], glob_t *globbuf, int headlen)
 {
   int i, j;
   MPlist *load_key = mplist ();
@@ -682,7 +693,8 @@ register_databases_in_files (MSymbol tags[4], glob_t *globbuf)
 		: (tags[j] != Mnil && tags[j] != tags2[j]))
 	      break;
 	  if (j == 4)
-	    register_database (tags2, load_database, globbuf->gl_pathv[i],
+	    register_database (tags2, load_database,
+			       globbuf->gl_pathv[i] + headlen,
 			       MDB_STATUS_AUTO);
 	}
       M17N_OBJECT_UNREF (plist);
@@ -913,7 +925,7 @@ mdatabase__update (void)
 		{
 		  if (glob (path, GLOB_NOSORT, NULL, &globbuf))
 		    continue;
-		  register_databases_in_files (tags, &globbuf);
+		  register_databases_in_files (tags, &globbuf, 0);
 		  globfree (&globbuf);
 		}
 	      else
@@ -928,7 +940,7 @@ mdatabase__update (void)
 		      continue;
 		    if (glob (path, GLOB_NOSORT, NULL, &globbuf))
 		      continue;
-		    register_databases_in_files (tags, &globbuf);
+		    register_databases_in_files (tags, &globbuf, d_info->len);
 		    globfree (&globbuf);
 		  }
 	    }
@@ -955,7 +967,7 @@ mdatabase__load_for_keys (MDatabase *mdb, MPlist *keys)
       || mdb->tag[0] == Mchar_table
       || mdb->tag[0] == Mcharset)
     MERROR (MERROR_DB, NULL);
-  MDEBUG_PRINT1 (" [DATABASE] loading <%s>.\n",
+  MDEBUG_PRINT1 (" [DB]  <%s>.\n",
 		 gen_database_name (name, mdb->tag));
   db_info = mdb->extra_info;
   filename = get_database_file (db_info, NULL);
@@ -1385,11 +1397,6 @@ mdatabase_define (MSymbol tag0, MSymbol tag1, MSymbol tag2, MSymbol tag3,
 void *
 mdatabase_load (MDatabase *mdb)
 {
-  int mdebug_mask = MDEBUG_DATABASE;
-  char buf[256];
-
-  MDEBUG_PRINT1 (" [DATABASE] loading <%s>.\n",
-		 gen_database_name (buf, mdb->tag));
   return (*mdb->loader) (mdb->tag, mdb->extra_info);
 }
 
-- 
1.7.10.4