diff --git a/library/DATABASEFNS b/library/DATABASEFNS
index e8b1c582..4742524c 100644
--- a/library/DATABASEFNS
+++ b/library/DATABASEFNS
@@ -1,19 +1,14 @@
 (DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "INTERLISP" :BASE 10)
 
-
(FILECREATED "11-May-2026 14:41:08" {DSK}<home>matt>Interlisp>medley>library>DATABASEFNS.;3
 19373  
+
(FILECREATED "12-May-2026 12:45:18" {MEDLEY}<library>DATABASEFNS.;13
 19361  
 
-      :EDIT-BY "mth"
+      :EDIT-BY rmk
 
-      :CHANGES-TO (FNS DUMPDB DBFILE LOADDB MAKEDB)
+      :CHANGES-TO (FNS DUMPDB MAKEDB)
 
-      :PREVIOUS-DATE " 2-May-2026 17:38:46" {DSK}<home>matt>Interlisp>medley>library>DATABASEFNS.;1
-)
+      :PREVIOUS-DATE "11-May-2026 14:41:08" {MEDLEY}<library>DATABASEFNS.;11)
 
 
-(* ; "
-Copyright (c) 1986, 1990-1993, 2024, 2026 by Xerox Corporation.
-")
-
 (PRETTYCOMPRINT DATABASEFNSCOMS)
 
 (RPAQQ DATABASEFNSCOMS

@@ -166,7 +161,8 @@ Copyright (c) 1986, 1990-1993, 2024, 2026 by Xerox Corporation.
 (DEFINEQ
 
 (DUMPDB

-  [LAMBDA (FILE PROPFLG)
                                     (* ; "Edited 11-May-2026 14:41 by mth")


+  [LAMBDA (FILE PROPFLG)
                                     (* ; "Edited 12-May-2026 12:45 by rmk")


+                                                             (* ; "Edited 11-May-2026 14:41 by mth")


                                                              (* ; "Edited  8-May-2026 16:18 by mth")


                                                              (* ; "Edited  2-May-2026 17:32 by mth")


                                                              (* ; "Edited 29-Apr-2026 17:42 by mth")


@@ -191,7 +187,7 @@ Copyright (c) 1986, 1990-1993, 2024, 2026 by Xerox Corporation.
               (SAVEDDEFAULTCOPYRIGHTOWNER DEFAULTCOPYRIGHTOWNER))
              (CL:UNWIND-PROTECT
                  (PROG (DBFILE
 DBFN DBROOTFN FLCPR (FL (ROOTFILENAME FILE))
-                              (FNS (FILEFNSLST FL)))
+                              (FNS (FILEFNSLST FILE)))
                        (SETQ DBFN (PACKFILENAME 'EXTENSION 'DATABASE 'VERSION NIL 'BODY FILE))
                        (SETQ DBROOTFN (ROOTFILENAME DBFN))
                        (CL:UNLESS (OR (EQ COPYRIGHTFLG 'NEVER)
@@ -337,6 +333,7 @@ Copyright (c) 1986, 1990-1993, 2024, 2026 by Xerox Corporation.
 
 (MAKEDB

   [LAMBDA (F)                                                (* DECLARATIONS%: UNDOABLE)

+                                                             (* ; "Edited 12-May-2026 12:37 by rmk")

                                                              (* ; "Edited 11-May-2026 14:38 by mth")

                                                              (* rmk%: " 9-NOV-83 02:56")

     (DECLARE
 (GLOBALVARS SAVEDBFLG MSFILETABLE DWIMWAIT))
@@ -388,9 +385,8 @@ Copyright (c) 1986, 1990-1993, 2024, 2026 by Xerox Corporation.
 
 (RESETSAVE DWIMIFYCOMPFLG T)
 )
-(PUTPROPS DATABASEFNS COPYRIGHT ("Xerox Corporation" 1986 1990 1991 1992 1993 2024 2026))
 (DECLARE%: DONTCOPY
-  (FILEMAP (NIL (1804 6952 (DBFILE 1814 . 3582) (DBFILE1 3584 . 5094) (DBFILE2 5096 . 6318) (LOAD 6320
- . 6550) (LOADFROM 6552 . 6740) (MAKEFILE 6742 . 6950)) (7008 18761 (DUMPDB 7018 . 12505) (LOADDB 
-12507 . 17578) (MAKEDB 17580 . 18759)))))
+  (FILEMAP (NIL (1666 6814 (DBFILE 1676 . 3444) (DBFILE1 3446 . 4956) (DBFILE2 4958 . 6180) (LOAD 6182
+ . 6412) (LOADFROM 6414 . 6602) (MAKEFILE 6604 . 6812)) (6870 18839 (DUMPDB 6880 . 12478) (LOADDB 
+12480 . 17551) (MAKEDB 17553 . 18837)))))
 STOP
diff --git a/library/DATABASEFNS.LCOM b/library/DATABASEFNS.LCOM
index be3d2c37..4d402590 100644
Binary files a/library/DATABASEFNS.LCOM and b/library/DATABASEFNS.LCOM differ