X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Fmain%2Fbase.lisp;h=667285c6faf830ad89eed0138796a7d655bf837e;hp=f90c77f8c200f9b3202f847f1361c6e196802af5;hb=d5b1d2277655b8771cc22aba7828e0b373b7d024;hpb=762ab38881c8870c9a61ca6857a28159f9fef9fc

diff --git a/src/main/base.lisp b/src/main/base.lisp
index f90c77f..667285c 100644
--- a/src/main/base.lisp
+++ b/src/main/base.lisp
@@ -1,6 +1,6 @@
 (in-package #:clnl)
 
-(defvar *model-package* (find-package :cl-user)
+(defvar *model-package* (find-package :clnl-default-model-package)
  "*MODEL-PACKAGE*
 
 VALUE TYPE:
@@ -9,13 +9,18 @@ VALUE TYPE:
 
 INITIAL VALUE:
 
-  The common-lisp-user package
+  The package named by :clnl-default-model-package
 
 DESCRIPTION:
 
   *MODEL-PACKAGE* is used for interning symbols as a NetLogo code
   gets compiled.
 
+  :clnl-default-model-package is used because it's set up to shadow
+  common overlaps between the :cl package and netlogo programs, most
+  notably GO.  When you set this to a package of your choosing, be
+  aware of those overlaps in the case that use :use :common-lisp
+
   Any local symbols are interned in this package, for use either
   by other code, or in order to have all symbols interned in the
   same placakge.  This is also the package in which a model should