Mercurial > hg > xemacs-beta

diff src/database.c @ 48:56c54cf7c5b6 r19-16b90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-16b90
author cvs
date Mon, 13 Aug 2007 08:56:04 +0200
parents 859a2309aef8
children 131b0175ea99
line wrap: on
line diff
--- a/src/database.c	Mon Aug 13 08:55:32 2007 +0200
+++ b/src/database.c	Mon Aug 13 08:56:04 2007 +0200
@@ -543,8 +543,10 @@
   DB_FUNCS *funcblock;
   struct database_struct *dbase = NULL;
   void *db = NULL;
+  struct gcpro gcpro1;
 
-  CHECK_STRING (file);
+  GCPRO1 (file);
+  file = Fexpand_file_name (file, Qnil);
 
   if (NILP (ackcess))
     {
@@ -623,6 +625,8 @@
   dbase->funcs = funcblock;
   XSETDATABASE (retval, dbase);
 
+  UNGCPRO;
+
   return (retval);
 }