From c8d6a86fcc61c4bee855fc2cfa2ae7338f2084f8 Mon Sep 17 00:00:00 2001
From: Gabriel Dos Reis <gdr@axiomatics.org>
Date: Fri, 22 Jan 2016 16:19:04 -0800
Subject: finalizeLisplib: skip category packages

The documentation for the operations from category packages is already
present in the original category, so there is no value in duplicating
them for the default packages.
---
 src/interp/lisplib.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/interp/lisplib.boot b/src/interp/lisplib.boot
index a47ed36c..e2eb834d 100644
--- a/src/interp/lisplib.boot
+++ b/src/interp/lisplib.boot
@@ -580,7 +580,7 @@ finalizeLisplib(db,libName) ==
   writeAbbreviation db
   writePrincipals db
   writeAncestors db
-  if not $bootStrapMode then
+  if not $bootStrapMode and not dbDefaultPackage? db then
     writeDocumentation(db,finalizeDocumentation db)
   if $profileCompiler then profileWrite dbLibstream db
   leaveIfErrors(libName,dbConstructorKind db)
-- 
cgit v1.2.3